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GESPAC Gives You 
68000 Performance at 8-bit Prices. 
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Introducing another Price / Performance 
breakthrough from GESPAC: A complete 68000 
CPU module for $395 unit price. The GESMPU-4B. 

Wherever you thought of using an 8-bit 
microprocessor to do a job, you can now use the 
16/32-bit GESMPU-48 instead. It will do the job, 
better, faster, and besNof-all for the same money. 

On a single height Eurocard, we have packed an 
8 MH2 68000 microprocessor (16 MHz optional), 
four sockets for up to 64 Kilobytes of zero-wait-states 
CMOS RAM and up to 128 Kilobytes of EPROM, 
one RS-232 serial port, and three 16-bit timers. 

The GESMPU-4B is fully expandable through 
the standard G-64 bus, to accommodate up to 
16 Megabytes of external memory. You con add 
any of more than 300 I/O modules available from 
GESPAC and a growing numbers of independent 
G-64 bus vendors. 

To make your programming tasks easier, 
GESPAC supports the GESMPU-4B with the OS-9« 
and PDOS® real-time, multi-tasking operating 
systems and most popular high level languages 
and software development tools. 



$316 
100 pwcel 



If you too like the ideo of getting more for 
less, contact us today to receive information 
on the GESMPU-48 and the G-64 bus concept 
from GESPAC— the leader in single Eurocard 
microcomputer products worldwide. 

Call Toll Free 1-800-4-GESPAC 
or Call (602) 962-5559. 
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IN USA -CANADA 

50A West Hoover Ave. 
Mesa, Arizono 85202 
Tel. (602) 962-5559 
Telex 386575 



INTERNATIONAL 

3, chemin des Aulx 
CH-1 228 Geneva 
Tel. (022) 713400 
Telex 429989 
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I^M ^n JL lnC 1337 WEST 37th PLAC6 • 

GMX MICRO 20 PRICt LIST 

MICRO 20 (12.5 mi) M/l SAB $2565.00 

MICRO 20 (16.67 mi) M/l SAB 12895.00 

MICRO 20 (20 mi) M/l SAB 13295.00 

OPTIONAL PARTS AND ACCESSORIES 

68881RCI2 $ 295.00 

68881RC16 1 395.00 

hOTOROU 68020 USERS MANUAL f 18.00 

MOTOROLA 68881 USDS WW*. $ 18.00 

S8C ACCESSORY PACKAGE (K20-AP) $1690.00 

The package includes a PC-style cabinet with a 
custom backpanel a Xebec 1410A hard disk control- 
ler, a 25 Megabyte (unformatted) hard disk, a 
5 1/4* DSHD 50 track floppy disk drive, a 150 watt 
pouer supply, cooling fan, panel mounted reset and 
abort swirtnes and ill necessary internal cabling 

BACK PAhEL PLATE (BPP^PC) For Above • 44.00 

2nd 5"80 FLOPPY It CABl£S FOR K20-AP. ADD..$ 250.00 

SECOND 25NB HARD DISK k CABLES, ADO I 780.00 

TO SUBSTITUTE 85MB KD FOR 25tt W), ADO.... II 800. 00 

1/0 EXPANSION HMDS 

16 PORT SERIAL CMD ONLY (SBC-16S) $335.00 

The S9C-16S extends the I/O capabilities of the 
GMX Kicro-20 68020 Single-board Computer by adding 
sixteen asynchronous serial I/O ports. By using 
two SBC-16S boards, a total of thirty-six serial 
ports are possible. 

RS232 Adapter <SAB-25,SAfrTO or RJ-45) $165.00 

The board provides level-shifting between TTL 
level and standard RS-232 signal levels for up to 
4 serial I/O ports. 

60 LUC PARALLEL I/O DWD (S -60P) 1399.00 

The GMX S8C-60P uses three 68230 Parallel Inter- 
face/Timers (PI/Ts) to provide up to forty-eight 
paraUel I/O lines. The I/O lines are buffered in 
six groups of eight lines each, with separate buf- 
fer direction control for each group. Buffer 
direction can be fixed by hardware jumpers, or can 
be software programmable for bidirectional applica- 
tions. 

PROTOTYPING BOARD (SBCHM) $75.00 

The SBC-tmf provides a means of developing and 
testing custom I/O interface designs for the GMX 
Mkro-20 68020 Single-board Computer. The board 
provides areas for both DIP <D al Inline Package) 
and PGA (Pin Grid Arrav) devices, and a pre-wired 
memory area for up to 312K bytes of dynamic RAM. 

I/O BUS AOtfTER (S8C-BA) $195.00 

The SBC-BA provides an interface between the OMX 
Micro-20 68020 Single-board Computer and the 
Motorola Input/Output Channel (I/O bus). With the 
I/O bus, up to sixteen off-the-shelf or custom 
peripheral devices (I/O modules) can be connected 
to the GMX Micro-20. 

AROCT LAN board w/o Software (SBC- AN).... $475. 00 

The SBC-AM provides an interface between the 
GMX Micro-20 68020 Single-board Computer and the 
AROCT modified token-passing Local Area Network 
(LAN) original )y developed by Datapoint orp. The 
AROCT is a baseband network with a data trans- 
mission rate of 2.5 Megabits/second. The standard 
transmission media is a single 93 ohm RG-62/U 
coaxial cable. Fiber optic versions are available 
as an option. 

0S9 LAN Software Drivers for S8C-AN $ 120.00 
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GHX MICRO 20 SOFTWARE 
020 BUG UPDATE - PR0T1S It MAMJAL. 



.$ 150.00 



THESE 68020 OPERATING SYSTEMS ARE PRICED tf€N PW- 
CWSED WITH THE MICRO-20. PLEASE ADO $150.00 IF 
PURDWSED LATER FOR Tt€ UPDATED PROHS AM) MAKMLS. 

0S9 

0S9/68020 PROFESSIONAL PAK $ 850.00 

Includes O.S "C" EDITOR, PSSNUR, (ERHO, 
development utilities, 68881 support* 

Other Software for OS-9/68020 

BASIC (included in PERSON*. PAK) $ 200.00 

C COTILER (included in PROFESSIONAL PAK).$ 500.00 
PASCAL COFILER $ 500.00 

UNIFLEX 

UmFLEX (when ordered with Board) $ 450.00 

UniFLEX WITH REAL-TIME EWANIDCWTS $1000.00 

Other Software for UniFLEX 

UniFLEX BASIC U/PRE OHPILER $ 300.00 

UniFLEX C COFILER $ 350.00 

UniFLEX COBOL COFIIER $ 750.00 

UniFLEX SCREEN EDITOR $ 150.00 

UniFLEX TEXT PROCESSOR $ 200.00 

UniFLEX SORT/fCRGE PACKAGE $ 200.00 

UniaEX VSAfl rtHJULE $ 100.00 

UniFLEX UTILITIK PACKAGE I $ 200.00 

UniFLEX PARTIAL SOKE LICEHSE $1000.00 

GMX EXCLUSIVE VERS IONS, CUSTOMIZED FOR Tt£ MICRO-20, 
OF T>€ BELOW LANGUAGES AND SFTV*VE ARE ALSO AVAIL- 
ABLE FROM GMX. 

BSOFT FORTRAN (UniFLEX) $1500.00 

SQLPTOR (specify UniFLEX or 0S9) $ TO.00 

FORTH (0S9) $ 595,00 

DYNACALC (specify UniFLEX or QS9> $ 300.00 

OMX DOES NOT GUARANTEE PPFGWWCE OF ANY GHX 
SYSTEH5. BOARDS OR SCFTVmVE kt€N USED WITH 0!>€R 
MANUFACTURES PRODUCT. 

ALL PRICES ARE F.O.B. CHICAGO 

GMX, Inc. reserves the right to change pricing, 
terms, and products specifications a? any time 
without further notice. 

TO (KDER BY MIL: SOO QCCK OR MOICY ORDER OR 
USE YOU VISA OR MASTER CHARGE. Please allow 
3 weeks for personal checks to clear. U.S. 
orders add $5 handling if under $200.00. 
Foreign orders add $10 handling if order is 
under $200.00. Foreign orders over $200.00 
will be shipped via Emery, Air Freight COLLECT, 
and we will charge no handling. All orders 
must be prepaid in U.S. funds. Please note 
that foreign checks have been taking about 8 
weeks for collection so we would advise 
wiring money, or checks drawn on a bank account 
in the U.S. Our bank is the Continental Illinois 
National Bank of Chicago 231 S. LaSalle Street, 
Chicago, IL 60693, account number 73-32033. 

CONTACT GMX FOR MORE Iff OfMTION ON TNE ABOVE FTOWCTS 

OMX STILL SELLS OIMIX S50 BUS SYSTEMS, BOARDS I PARTS. 
CONTACT GMX FOR (WlTTE PRICE LIST. 
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EXCITING SOFTWARE FROM THE LEADER. 




OS-9 ELECTRONIC MAIL 

I'tasb your message on Electronic Mail Mail is a 
screen- or line-oriented program that runs on your 
OS 9/680X0 systems or over OS 9/NKT You can use 
distributed mailing lists or consecutive mailing list to 
get your message delivered And received mail can be 
sent directly to your printer for immediate printout, 
spooled on a multiuser system or saved to a (lie Mail 
features online help and complete, easy to understand 
documentation. 
Ktectronic Mail $150.00 



OS-9/ST 

NKW for your Atari ST\ Now you can have the power of 
OS 9 on your Atari 520 or 1040 ST. A true 
multi tasking environment for professional real time 
results. OS 9/ST is available in two configurations: 
Personal and Professional Choose either version for 
true multi-user support.,. And all at a price that puts 
UNIX to shame. 

Personal 0&9tf5T combines the power of OS 9 with 
an interactive, structured Basic. $ 150.00 



PRINT SPOOLER 

Spool it and Print it! Someone beat you to the printer? 
Don't blow your top while you cool your heels-get the 
OS 9/68000 Print Spooler and relax. The full featured 
Print Spooler automatically routes and monitors the 
status of your devices and the output files to be spooled. 
Now you can have a complete print spooling manage- 
ment system ata n affordable price. 
OS 9 Print Spooler $150.00 

FORTRAN 

Crunch It! with Our New KOKTKAN 77 Compiler Now 
you have a powerful new tool to take full advantage of 
the 68000 family of microprocessors. With Microware's 
KOKTKAN 77 Compiler you can generate code that uses 
systenvwide modules instead of linking redundant 
copies of the standard library to each program. Result: 
less memory, less disk space, faster loading and 
external updating! 
FORTRAN 77 Compiler $750.00 



Professional OS 9/ST has a powerful Assembler, 
Linker and User Debugger and the tools to turn 
your Atari ST into a full C Language 
workstation. $600.00 

OS-9/68020 C COMPILER 

NKW "speed demon" C Compiler! N ow you can get your 
kinds on a highly optimized C Language power 
tool the OS 9/68020 C Compiler. When coupled with 
the MC6888! math co processor, this compiler will let 
you'll blast through complex math functions in the 
blink of an eye. All compiler/assembler/linker options 
urr controlled by .in intelligent compiler executive that 
spares you from memorizing compiler options and 
module calling sequences And the compiler includes 
library functions for memory management and system 
events, and much, much more! The new OS-9/68020 C 
Compiler is included with the Professional OS 9/68020 
System Software Package, 
NewC Language Compiler $750.00 



To order these exciting N KW products or for more information. 



CALL TODAY! 



Microware Systems Corporation 

1900 N W 1 14th Street » Des Moines, Iowa 50322 
Phone 515*224 1929 ♦ Telex 910 520 2535 



West Coast Office 

4401 Great American Parkway • Suite 220 
Santa Clara, California 95054 
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Microwatt Japan. Ltd. 

41 l9lloncho4 Chome KunabashiCity »Chiba273, 
Japan • Phone 0473 (28) 4493 ♦ Telex 781 299 3122 
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Microware is on the move We have openings for Technical and Marketing Professionals. 

Send your resume (in confidence) today and find out more about these exciting opportunities. 

OS-9 mnd BASIC09 m trwammMfa of Mtcwwm* §nd M<Xo«**. UNIX, f a totomtS of B*H UtaraftriM, Inc. 
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DATA-COMP proudly presents the first 
Under $5000 "SUPER MICRO". 



The MUSTANG-020" 



MUSTANG-02& 



The MUSTANG020 68020 SBC 
provides a powerful, compact, 32 bit computer 
system featuring the "state of the art* Motorola 
68020 "super" micro-processor. It comes 
standard with 2 megabyte of high-speed SIP 
dynamic RAM, serial and parallel ports* floppy 
disk controller, a SASI hard disk interface for 
intelligent hard disk controllers and a batteiy 
backed- up time-of-day clock. Provisions are 
made for the super powerful Motorola MC6888 1 
floating point math co-processor, for heavy math 
and number crunching applications. An optional 
network interface uses one serial (four (4) 
standard, expandable to 20) as a 125/bit per 
second network channel Supports as many as 32 
nodes. 

The MUSTANG-020 is ideally suited to a 
wide variety of applications. It provides a cost 
effective alternative to the other MC68020 
systems now available. It is an excellent 
introductory tool to the world of hi-power, hi- 
speed new generation "super micros* 1 - In 
practical applications it has numerous 
applications, ranging from scientific to education. 
It is already being used by government agencies, 
labs, universities, business and practically every 
other critical applications center, worldwide, 
where true multi-user, multi-tasking needs exist. 
The MUSTANG-020 is UNIX C level V 
compatible. Where low cost and power is a must, 
the MUSTANG-020 is the answer, as many have 
discovered. Proving that price is not the standard 
for quality! 

As a software development station, a 
general purpose scientific or small to medium 
business computer, or a super efficient real-time 
controller in process control, the MUSTANG- 
020 is the cost effective choice. With the optional 
MC6888 1 floating point math co-processor 

installed, it has the capability of systems costing 
many times over it's total acquisition cost 



DATA-COMP 



With the DATA-COMP "total package 1 , 
consisting of a heavy duty metal cabinet, 
switching power supply with if/line by-passing, 
5 inch DS/DD 80 track floppy, Xebec hard disk 
controller, 25 megabyte Winchester hard disk, 
four serial RS-232 ports and a UNIX C level V 
compatible multi-tasking, multi-user operating 
system, the price is under $5000, w/t2.5 
megahertz system clock (limited time offer). 
Most all popula high level languages are 
available at very reasonable cost. The system is 
expandable to 20 serial ports, at a cost of less 
than $65 per port, in multiples of 8 port 
expansion options. 

The system SBC fully populated, quality 
tested, with 4 serial ports pre-wired and board 
mounted is available for less that $3000. Quantity 
discounts are available for OEM and special 
applications, in quantity. AH that is required to 
bring to complete "system" standards is a 
cabinet, power supply, disks and operating 
system. All these are available as separate items 
from DATA-COMP. 
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A special version of the Motorola 020- 
BUG is installed on each board. 020-BUG is a 
ROM based bebugger package with facilities for 
downloading and executing user programs from 
a host system. It includes commands for display 
and modification of memory, breakpoint 
capabilities, a powerful assembler/disassemble 
and numerous system diagnostics. Various 020- 
BUG system routines, such as I/O handlers are 
available for user programs. 

Normal system speed is 3-4.5 MIPS, with 
burst up to 10 MIPS, at 16.6 megahertz. 
Intelligent I/O available for some operating 
systems. 

Hands-on "actual experience sessions", 
before you buy, are available from DATA* 
COMP. Call or write for additional information 
or pricing. 
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115 Mhi (optional 1o*6 Mhx avjJIabie) MC2O020 full 32-bit wide pain 

32- bit wide data and address buses, oort-mullJpicxcd 

on chip irutrudioh cache 

object code compatible wilh ail 6 8 XXX family procs&ors 

enhanced Inilnictlon set - math co-processor Inteilace 

60061 math hl-epe*d floating point o» yrojaa ap r (optional) 

direct odeniionof full 6*020 instruction set 

full support IEEE P7H draft 100 

transcendental andol her adcstlfk math fund ion* 

2 Megabyte of SIP RAM (512 x 32 bit organization) 

u p lo 256 K bytes of EPROM (64 x 32 bio) 

4 Asynchronous serial I/O porta standard 
optional to 20 aerial porta 
standard R5-232 inteifaoe 
optional network interface 
buffered Obit parallel port (1/2 MC66230) j 
Centronics type piaout 
expansion connector for I/O devices 
16 bit data path 
156 byte address space 
2 Interrupt inputs 
dock and control signals 
Motorola I/O Channel Modules 
time of day clock/calendar w/ballcr y backup 
controller for 2, 51/4"f loppy disk drives 
single or double aide, aingJe or double density 
35 to 80 track selectable (40-96 TH) 
SASI inteifaoe 

programmable pctiodlc Interrupt generator 
interrupt rate from mtcso-seoonds to seconds 
highly accurate time base (5 PPM) 

5 bit sense switch, readable by the CPU 
Hardware si ngle-slep capability 




Don't be mislead* 

ONLY Data-Comp 

delivers the Super 

MUSTANG-02Q 



These Ar-jpffrf 68030 systems are Presently «>arkv^g at 

NASA, Atomc E**r%y Commune*, Ohtv. «r 

Ag*mtt4g qm w§U «# (/«xnlltf, OWUasr, i-ohf, aad! 

s*W Critical Af/dm/wic as CtnUrt, anaVBSOc. «*fusr «p™< math 

cyuncMng and oeJn*Aer. *uatt a*c*a*r {/rVBC C Irwi Vasnpacafcaty 



10000 
9993 



«^p---i 115 Mba. 



HMO 



J71D0 
J7SO0 
73000 



16 Pen Mp. RS.2J2 

• 1 <*; I AiUf-o Car* Wow 



RSZKJL_. 

Eodiasd ipportf 4 add/fena* aw. pain 
(lead of 36 m lat port* ojpj**a*i) 

SOlbatParallatVOeacd 
Uim 3 61230 tdaWks/TVw O^x, 
6 (roup oft Law aach. a*pw«» fauJlar 
i (or oacA anwp. 



Only the"PRO" version 
of 


OS-9 supported! 


SK> 


ThisisrY£i4VTDt/7y 


Country! 



MUSTANG- 620 SBC 


SU9O60 


Cabinet WswIioHLag PS 


$299.9$ 


5^40 track noppy 


B&m $26*95 


Roppy cable 


$39.93 


OS-9 6SK ProfmlonaJ Ver. 


0850.09 


* Indudes C Compiler (3500.00) 




Winchester cabk 


S39.93 


Winchester Drive 15 Mbjt« 


mum 


liird UoJi conirtWkr 


SJ95O0 


Shipping USA UPS 


$20,00 



itarboth«lpaitdP0A<awfaMO ■ 

y«M^t»312XDftAM. 



AAQiBTansOadP 
LAKKrft* 



f isssao lor SioaviSa V0 Qtamol MoaUai 



Sf«4J faro**** MU5TAlt>020~ 

S695O0.SAVBX3O0O0 



47500 

n)-oaIL 
12000 

5195O0 
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for Professional 

OS-9 "Full Bore" 

Upgrade Kit 
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T-tei: Save $1000.00 ss.299.so 

complete sylern $4,299.80 

UmFLEX Less 

MC688a^l/pma^p/ocessor Add 

18 87 Kt)2 MC68020 

16.67 MIZMC868B1 

20 M 12 MC68020 Sy6 

Note oil 668B1 chip6 worX. witr» 20 IU9>z Sys 



StOO.OO 
$275.00 
$375.00 
$375.00 
$750.00 



Al MU JTANOOXP* wymm atat teaud bayan ■ 



Data-Coin p Division 

CU <j^Bssyx>V A Pcc"d<?of Quality Service 4 '^ 

*f ^ Sl/«(«^» iVorld-Wlsfe? ^ 

Computer Publishing. Inc. S900 Cassandra Smith Rood 

TolaphOnB 6l5 842-4601 • T«f*x 510 600-6830 Hbaoo, Tn 37343 
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NOTE: Only Professional OS-9 

now available (68020 Version) 

Includes ($500.00) C Compiler 

68020 fit 68881 supported 

complete 

Mbyte HD System 

$4299.80 

Mbyte HD System 

$5748.80 
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PAT - JUST 



"\ 



PAT 

With 'C* Source 
$229.00 



i m m 



)Wm\ 



A Division of 



S.E. 
Media 



5900 Cuuuh Smith Rd 
UtfMn,T» 37W1 
TcM*** 613*424*09 
Telex 510600-6630 



Telex! 



■iMMlt j 



PAT FROM S. E. MEDIA - A FULL FEATURED SCREEN ORIENTED TEXT EDITOR 

with all the best of PIE. For those who swore by and loved PIE, this is for YOU! All PIE 
features & much more! Too many features to list. And if you don't like ouis, change or add 
your own. C source included. Easily configured to your CRT terminal, with special configuration 
section. No sweat! 

68008 - 68000 - 68010 - 68020 OS-9 68K $229.00 



COMBO 




Special $249.00 

JUST 

JUST from S. E. MEDIA - - Text formatter written by Ron Anderson; for dot matrix 
printers, provides many unique features. Output formatted to the display. User con- 
figurable for adapting to other printers. Comes set-up for Epson MX80 with Graflex. Up 
to 10 imbedded printer control commands. Compensates for double width printing. 
Includes normal line width, page numbering, margin, indent, paragraph, space, vertical 
skip lines ? page length, centering, fill, justification, etc. Use with PAT or any other text 
editor. The ONLY stand alone text processor for the 68XXX OS-9 68K> that we have 
seen. And at a very LOW PRICE! Order from: S.E. MEDIA - see catalog this issue. 

68008 - 68000 - 68010 - 68020 OS-9 68K 
\^ With 'C source $79.95 J 
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An Ace of a System in Spades! The New 

MUSTANG-08/A- 

Now with 4 serial porta standard & speed Increase to 12 Mhz CPU + on board battery 
backup and includes the PROFESSIONAL OS-9 package - including the $500.00 OS-9 

C compiler! This offer won't last forever! 

Now even faster! 



NOT 128K, NOT 512K 
FULL 768K No Wait RAM 

The MUSTANGO0™ system took ©very hand from all 
other 68008 sysems we tested, running OS-9 68K! 

The MUSTANG-08 indudes OS9-68K™ andbr Peter 
Stark's SK*DOS . SrCDOS is a single user, single tasking 
system that lakes up where *FL£X™ left off. SK'DOS is 
actually a 68XXX FLEX type system (Not a TSC product; 
OS-9 6jBK system [© a fuB blown. mufti-user, tnufti- 
^68XX)ysysiem. Afl foe fSbpular 68Cp0 C^NSoftwate 
b a speei( whiz on disk , 
on dt^K access than some olfi 
j^ntay4aerte r acc«ss f ffcw,L 
latt^arhcf Iht storyf See b*n 

System includes OS-9 68K or SK*DOS - Your Choice 
Specifications: 



with 12 Mhz CPU 



C Compile time*, OS-9 68K. Hard Disk 
MUSTAHGOS 8 Aftz CPU Omln.&sec 

Other popular 69006 system 1mtn-Q5sec 

MUSTANG-020 0n*n-2l3ec 



=^ 



J 





JO Fad is: the-^USTANGV 
6*X)0C\s^ 
'fasfl AndJ' 




CPU 
RAM 

PORTS 



MCG8008 

768K 

No Washes 

4-RS232 

2-6bilParaM 

MK48T02 

16K.32Kor64K 

WD1772 

Irtrtrf* Port 



12 Mhz 
2S6K Chjps 



MC68681 QUART 

MC6821 PIA 

Real Tum Oct* Bat. B/U 

Selectable 

5 14Dtms 

WO1002 Bead 



a 25 Megabyte 
^ Hard Disk System 

$1,998.90 

Complete with PROFESSIONAL OS-9 

includes the $500.00 C compiler, PC 

style cabinet, heavy duty power supply, 

5" DDDS 80 track floppy - Ready to Run 



CLOCK 

EPROM 
FLOPPY 
H/lRD0|SK_ 

V Now more serial ports - faster CPU Bat^ 
} teiy B/U - and $850.00 OS^9 Profes- | 
* sional with C compiler included! j spac8 ffor ai p^^ purposes) to be utilized, what is not 

-^ ^ available to the user is required and reserved for the system. 



sional with C compiler included! 

$40o7od 



Unlike other 66008 systems there are several significant 
dlferenoas. The MUSTANG-08 is a full 12 Megahertz system, The 
RAM uses NO wait states, this means full bore MUSTANG type 
performance. 

Ateo, allowing for addressable ROMPROM the RAM is the 
maximum allowed for a 66008, The 68008 can only address a 
total of 1 Megabytes of RAM. The design allows all the RAM 



See Mustang-02 M - page 5 
for trade-in details 




MUSTANG-08 



LOOK 



S<roMs 



M5XMG-C0 10 Mhz 
MalnO 



68K 
68K....9.8 



32 bk Register 
Integer Long 
.18.0... 9.0 



.6.3 



r Int I; V 
bwp register long |; 

for (1=0; I < 999999; ++I); 



A RAM disk c4 480K can be easily configured, leaving 288K 
free for progra/Ttfsystem RAM space. The RAM DISK can be 
configured to any size your application requires (system must 
have 126K in addition to its other requirements). Leaving the 
remainder of the original 766K for program use. Sufficient 
source inducted (drivers, eto.) 

FUJCailmaeimrtorTSC MUSTANO-0>ii*B 



Data-Comp Division 

A Decade of Quality Service'^ 

Systems World-Wide ~^ 

Computer Publishing, Inc. 5900 Cassandra Smith Road 
Teteptone 615842-4601 - Telex 510 600-6630 Hmkx\ Tn 37343 

* IhDsa with SWTPC hfderdty R£X 5' - CcA for spedol Info, 
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The C Programmers 

Reference Source. 

Always Right On Target! 

C User Notes 



By: Dr. E. M. 'Bud* Pass 
1454 Latta Lane N.W. 
Conyers, GA 30207 
404 483-1717/4570 

Computer Systems Consultants 



INTRODUCTION 

This chapter continues the discussion of 
the conversion of Technical Systems 
Consultants BASIC and Microware BASIC09 
programs into C programs begun In the 
previous chapter. 

CONVERTING BASIC PROGRAMS TO C 

Expressions 

The table below presents a list of the TSC 
BASIC operators, in decreasing hierarchical 
order: 

< ) parentheses 
fun() functions 
* exponenation 

+ unary negative/positive 
multiplication /division 
addition/ subtraction 
string concatenation 
>-<><>- relational 
comparisons 
logical complement 



• / 

+ 



NOT 



The table below presents a list of the 
BASIC09 operators, in decreasing hierarchical 
order: 



( ) 


parentheses 


fun() 


functions 


+ 


NOT unary negative/positive 




logical complement 


* + * 


exponenation 


* / 


multiplication /division 


+ 


addition/subtraction 


<- 


-< >- »><>><<>' 




relational comparisons 


AND 


logical conjunction 


OR 


logical disjunction 


XOR 


logical exclusive disjunction 



A Tutorial Series 



The table below presents a list of the 
standard (K & RJ set of C language operators, in 
decreasing hierarchial order: 



( ) I I r> . parentheses, brackets, structure 

I „. + ++ - — (type) * * sizeofO 
unaiy operators 

* / % fiultlpllcatlon, division, remainder 
+ - addition, subtraction 

« » shift 

<<->>- relational operators 

—* !* relational operators 

4 logical conjuctlon 

* logical exclusive disjunction 

I logical disjunction 
*& boolean conjuctlon 

I I boolean disjunction 
? : ternary 

m +* -« *- /_ %. »■ «- t^ -. | M 

assignment 
, left to right evaluation 

TSC BASIC and BASIC09 allow Boolean 
expressions to be used in arithmetic contexts, 
returning non-zero for TRUE and zero for 
FALSE. All implement logical operators as 
bitwise, rather than TRUE/FALSE. They have 
somewhat different operator hierarchies. 
They interpret a binary V operator in a string 
context to represent concatenation. All 
evaluate expressions Involving operators of 
equal precedence on a left to right basis, except 
for those involving exponentiation, which are 
evaluated right to left. 
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The differences in arithmetic operator 
hierarchies, as indicated in the tables above, 
may cause subtle problems in terms of 
incorrectly calculated C expressions which are 
correctly calculated by BASIC. Such problems 
are minor in most programs and may always 
be solved by manually forcing expression 
evaluation order with parentheses, although 
the required modifications may be tedious and 
error-prone. Such changes should be 
performed before conversion, not afterward, 
whenever possible, to be able to ensure that the 
program is correct before the changes 
represented by the conversion are attempted. 

Essentially any expressions involving 
BASIC string variables will require 
modifications in the C program which cannot 
be performed until after the low-level 
conversions are performed, since they have no 
corresponding BASIC statements and 
expressions. 

Strings 

An area of potential major conversion 
problems concerns the differences in the 
handling of strings. TSC BASIC supports 
dynamic allocation of strings of arbitrary 
content and length of zero to 32767 bytes. The 
current length and pointer to the string are 
explicitly stored, associated with the string 
variable, vector, or matrix. BASIC09 suppoits 
a fixed allocation of strings of length zero to 
65535 bytes. The contents are not arbitrary, 
since the hex~if character code represents the 
end of the string. The maximum length and 
pointer are explicitly stored, but the current 
length is only implicitly determined as the 
length of the string up to but not including the 
hex-ff, or the maximum length, whichever is 
less. 

C normally provides a fixed length 
allocation of strings, with the maximum 
length implicitly determined by a hex-00 
character code. This may have an especially 
serious effect on the logic of programs using 
large string arrays, since BASIC09 and C 
programs normally allocate the maximum 
length for each string in the array, whereas 
TSC BASIC allocates only the necessary length 
for each string, and performs automatic 
allocation and deallocation for the 
programmer. 

One solution would be to recode every 
reference to a BASIC string as a C function call. 
This would provide the same string format and 
string processing environment available in the 
original BASIC program, However, since the 
string format and string processing 
environment of the C compiler and libraries 
will not agree with the user's, additional 
overhead would be introduced in translating 



formats between the two sets of functions, 
Environment-Dependent Operations 
BASIC09 supports the PEEK and ADDR 
functions and the POKE statement. TSC BASIC 
supports the DPEEK, PEEK, and PTR functions 
and the DPOKE and POKE statements. These 
operations are all highly dependent upon their 
environment and should not be expected to be 
easily converted to any other language or 
environment. 

If they are to be maintained at all. the TSC 
BASIC functions DPEEK and DPOKE should be 
changed to PEEK and POKE functions before 
the conversion process is attempted. DPEEK(n) 
is the same as the following: 

(ffEEKfn) « 8) OR PEEHfa + 1)) 

and DPOKE n.m is the same as the 
following: 

POKE n, (m » 8); POKE <n ♦ l),m AND 255 

The uses of the (D)PEEK functions and 
(D)POKE statements are veiy dependent upon 
the hardware and software configuration 
under which the program is expected to run. 

They may be used to inspect and modify 
locations in a BASIC interpreter to modify its 
internal operations; such uses are obviously 
incorrect when using a C compiler. Another 
common use of PEEK and POKE is to perform 
I/O operations on memory-mapped I/O 
locations; such code may or may not perform 
the expected operations In another 
environment on the same type of computer and 
almost certainly will fall on another type of 
computer. 

The PTR function Is used to obtain the 
address of a string desciiptor or a variable, and 
the ADDR function Is used to obtain the 
address of a string or variable. The length and 
format of a BASIC floating point or integer 
number are different from the length and 
format of a C floating point or integer number. 
Thus, any BASIC program logic involving the 
ADDR or PTR function probably must be 
rewritten during the conversion of the program 
to the C language. 

Input/Output 

I/O file numbers are used in similar 
manners In TSC BASIC and in BASIC09. 
although there are several differences in 
interpretation. They are used in the OPEN. 
CLOSE, INPUT. PRINT. GET, PUT. FIELD, and 
DIM statements and in the INCH$ function in 
TSC BASIC to designate the logical channel 
from which data is to be read or to which data 
is to be written. 
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A difference between the versions of BASIC 
concerns file number zero. TSC BASIC 
interprets file number zero to be the user's 
terminal, unless the file is opened for output, 
in which case it Is Interpreted to be a printer, or 
unless the file Is opened for input, in which 
case the input prompts to the terminal are 
deleted. 

BASIC09 Interprets file number zero to be 
the standard input file (normally the user's 
keyboard), file number one to be the standard 
output file (normally the user's screen), and file 
number two to be the standard error output file 
(normally the user's screen). These files need 
not be opened; however, they may be closed and 
redirected to another device, if required. This 
usage is consistent with the use of low-level file 
descriptors in the C language. 

The OPEN statement in TSC BASIC accepts 
as a file number a constant or a variable 
containing a value. The OPEN and CREATE 
statements in BASIC09 place a file number 
into a variable. Thus, all BASIC09 file 
numbers used in statements and functions 
should be variables, unless they reference file 
numbers zero, one, or two. in which they may 
be constants or variables. 

File-Naming 

A difference between the systems discussed 
here concerns file- naming conventions. File 
naming rules are generally more dependent 
upon operating system requirements than 
upon BASIC conventions, and may cause 
problems in conversion of programs from one 
operating system to another, even when using 
the same language. 

TSC BASIC FLEX Me speciHers reference 
disk files. They are composed of an optional 
drive number (0-3). a file name of 1 to 8 
characters, and an optional suffix of 1 to 3 
characters. The Hie name and suflix must start 
with a letter and may be composed of letters, 
digits, and certain special characters. The 
drive number, if present, is separated from the 
file name with a period. The suflix. if present. 
Is also separated from the file name with a 
period. Letter case is significant. If drive 
number is omitted, the default work drive is 
assumed. If file number zero is opened for 
output, the Hie name is assumed to be a printer 
driver. Other than Hie number zero, this usage 
is compatible with C compilers under FLEX, 

TSC BASIC UNIFLEX file specifiers 
reference any device. They are composed of an 
optional path name and an optional file name. 
The file name should start with a letter and 
may be composed of letters, digits, and certain 
special characters. Letter case is significant. 
Not both path name and file name may be 
omitted. If the path name is omitted, the 
current default directory is used. This usage is 
compatible with C compilers. 



BASIC09 OS-9 file specifiers reference any 
device. They are composed of an optional path 
name and an optional Hie name. The Hie name 
should start with a letter and may be composed 
of letters, digits, and certain special 
characters. Letter case is not significant. Not 
both path name and file name may be omitted. 
If the path name is omitted, the current default 
data directory is used. This usage is compatible 
with C compilers. 

This discussion is continued in the next 
chapter. 

EXAMPLE C PROGRAM 

Following is this month's example C 
program; it paginates a listing of a list of files. 



I Include <stdlo.h> 
i include <ctype.h> 
t Include <titjve.h> 

TILE -input; 

unsigned char "argt. cfw llne[2S6], 'p. date(135]; 

unslgned form[64) [*>\2] . eatc[2S«M8]; 

long tlfrtex; 

short lnt 1. j. k. 1. files, lines, pages, q, r. tt, dt. pg * 59, 

short lnt asls. td, fl. trunc. reel • 78. escape. escflgU*8]? 



maln<argcrargv) 




lnt argc; 




unslgnod char **argv; 
t 




t 

for {argt • argv; * (P 


• • largt ♦ 111 -- •-'.• 


I 

♦♦files; 




♦♦argt; 




*hile <♦♦*!>> 
i 




switch <*p) 


case 


♦A": 


case 


•a' : 




4 ♦sals; 




break; 


case 


•D': 


case 


■d': 




♦ ♦dt? 




break; 


case 


■F': 


case 


•r« 




♦♦ft; 




break; 


ca*9 


»E': 


case 


•e' : 




reel - 93; 




break ; 


case 


. p ._ 


ess* 


"P*: 




pg - 80; 




break; 


case 


*S*: 


case 


' *' : 




reel - 79; 




break; 


esse 


♦r: 


case 


't*: 




♦♦trunc; 




break; 


case 


•it: 


case- 


*¥* : 




reel - 131; 




break; 


case 


•f: 


ease 


'f: 




If (1 - •♦♦p * 0x7fJ 



10 
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3 



3 



<0 



I 



for (++escape, J - k - 0; ♦♦♦p; ) 
( 

If (iadigitep)) 

k - U « 4) | C-p 4 OxOf); 
else 
If (Cp >- 'A") 44 Cp <- T»n 

k - (k « 4) ♦ Cp - 'A' ♦ 10): 
else 

If (Cp >- »«♦> 44 (*p <- »f»)J 

k - (k « 4) ♦ Cp - *a r ♦ ia); 
else 
If CP — "') 

i 

i I- 12B; 

3 - 0; 

contlnue; 
I 
else 

break; 



if 

1 



If O < 16) 

sescdl tj » 1] 
k - 0; 



) 
♦♦J: 

— p; 

break; 



) 



default: 



print f( 

■\n%s foxrciats input files to output \n\n' 

argv (0)); 
printf ("Usage: %s [-optional [filenames] Vn", 

arc* [01); 
printf C -a output files as inputVn"); 
printf (" -d add page headingVn") ; 
printf C ~e fold page at 94 charactersVn"); 
printf (" -f suppress final fona-feed\n-) ; 
printf C -p page at SO lines (default 60) \n" 
printf (" -t truncate, do not fold lines\n a ); 
printf C -s fold page at B0 charactersVn"); 
printf C -w fold page at 132 charactersVn"); 
printf ( 

■ -zxssss-tttt set escape sequencesVn") ; 



printf C 
printf (" 
printf (" 
print fC 
exit (1) ; 



for Ix ... Ix text cenplateVn") ; 
as hex values ssss and ttttVn"); 
for starting and terainatlngVn"); 
codes (each < ft characters) \n\n B ) 



for (ch - 0; ♦♦files < argc; ) 
( 

if (Minput - fopen(«t+argt-*r"))) 

I 

fprintf (stderr,*page: can't open %s\n M r "argt) ; 
continue; 

\ 



dace[0] - 0x20; 

strcpy(date * l.'argt); 

for (q - strien(date}; q < 45; ♦ ♦q) 

date{q] - 0x20; 
tiaex - tii&e((long •) o) ; 
strcpy(fcdate(q] # cti»e(4tlniex) ); 
date [str left (date) - 1] - 0x00; 
pages - 0; 
lines - 999; 
td - dt; 
fl - 0; 
ch - '\t': 
putc ( • \n* , stdout) ; 
while (fgets (line, 255, input)) 
i 

r - expand_line(); 

If (trunc)" 

r - l; 

if Uin«(0] — *\f> 
fl ■ 1; 

It (asis) 

( 

fputx (form[l] , stdout) ; 
continue; 

) 

if ((Ifl) 44 ((lines ♦- r) > PQ) ) 

( 

if (lines < 999) 

fputx ("\f\n" r stdout J ; 
If (td) 



* 



I 
else 



fpr intf (stdout, "%s %d\n\n" 

date, ♦♦pages); 
lines - 2; 



lines 



for (q - 1; q <- r; **q) 

fputx ( form (q| , stdout); 

if ((Ch !- «\f») 44 (iff) ) 

putc r\t\ stdout); 
f close (input); 



expand linen 

( 



unsigned chsr *p, "q, 
short lnt i, j, k, 1 



if (((3 - lined 

iinelil « 
for (p - line* 1 
I 



strlen(line) - 1)) — 
'VO'; 
1, j - * - 1/ q - p ♦ 1. 



Vn«) It (j — *\r')) 
- 0? ; p - q, ♦♦$) 



switch CP) 

{ 

case ' \0 ' : 

for»(i] I3++1 - *\n' 
fom[i][Jl - 'VO 4 ; 
return 1; 








EXAMPLE C PROGRAM 


case ' \r': 




case *\n' : 


This example C program provides an Interactive file 


form[l | [ j-nj - ' \n' ; 
form[l++| ( j| - *\0' ; 


inquliy and modification facility. It should work with 


if (j - * - n 


any C compiler supporting a linear FSEEK function. 


formlll (0] - 0x20; 


Depending upon the compiler, the MODER and 


brea* ; 


MODEW defines may require specification to piovlde 


case ' \t ' : 

If (*q ~ 'NO') 


binary read and blnaiy update capabilities. 


I 

form[l| [j++| - '\n'; 


r 

flledlt fllvunv-ljflt 


fomll] [j] - '\0\- 


'/ 


return 1; 




) 


•include <atdio,h> 


do 


lincludtt <etyp».h> 


1 

if (k+* >- reel) 


llfndflf WZER 


j 


Iderine Moco* •#" 


forro(H [j* + | - '\n'r 


lendlf 
llfndef MODEM 


form(l++| (jl - 'NO'; 


♦define KCDEW -r+" 


if (j - * - 1) 


fendlf 


form(i] IQ] - 0x20; 




break; 


FILE 'Input, 'output; 


) 


char -p, -q, hold 1256] r loci (256]; 


forra[l! ()♦♦! - 0x20; 


long where* loct 


J 


short Int off*, c, 1, j, 1, in, n, a, v, v, x, zt 


while (k 4 0x07); 




break; 


sain targe, arg*) 




ahort Int argc; 


case • I ■ : 


char a a?gv[]/ 


If (asis || (Jescape) It (!(m- -q))) 


( 


goto passthru; 


print f ("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n") ; 


p - Q++; 


prJntf (•\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n") ; 


If <m — * I') 


if (argc < 2) 


goto passthru; 


< 


If (! (escflg[m| - !e«cng(m})) 


print f(*gaaget Is l-nl fii«-U«t\n\ *rgv(0)); 


m 1- 128; 


prlntf C Interactively Amps fllaa in file-)lat\n"|; 


for (r - setclrul; *r; **r) 


prlntf{" -vi option dump* files continuoualyVn**) ; 


formtiJ[j++l - *r; 


exit (Oh 


break; 


for (j - 1; 3 < *rgc; ♦♦j) 


case '\b': 


n -*- l*argvl51 — '-'); 


k — 2; 


for (j - 1; j < argc; ♦♦)) 


default: 


\ 


passthru: 


it (j < 1) 
J - U 


formfl| [j++J - »p; 


if {*♦♦ >- reel) 


If l*argv(J] — •-•> 


if cq (6 rq 1* '\b') ) 


continue; 


( 


if 1* (input - fopontargvlH, moaerj n 


rozm(lHj++) - '\n'; 


if <3n| 


form[U+J lj] - '\0'; 


\ 


If (j - k - i) 


print f <"\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n") ; 


foriufi) [0\ - 0x20; 
1 


prlntf ( "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n") ; 


J 


prlntf ("\oCannot find %».% scgv|3J)/ 


1 


fflueMstdout),- 


\ 


lf H'ni &t (ifg»t»(hold, 256, atdln))) 




j - *ryc/ 


fputxU, iop) 


continue; 


register char *s; 


i 


register FILE "lop; 


for (where - 0L, v - -1; ; where -h- 256L) 
[ 


( 


prlntf f\n\n%a:*, argv(j]>; 


register int c; 


If (w) 


while (c • *s++) 


( 

prlntf I* \-">; 


( 


for <v - 0, x - (1 < 16) ? 1 : 16; v < x; ♦ ♦*> 


putc(c, lop); 


if (ntf 


if ({c 1- '\n'> (6 (c 1- '\r')> 


dapchr(locl|v)U 


ch - c; 

1 


else 

put char (loci tw)>; 


If {v >• 0) 


1 


prlntf ("\" found at %lx- f loc); 




•X«e 


EOF 


prlntf ("V not found*); 
1 




put char CVnV; 




dsplntUlat) ((where » 1 6I> 4 OxffffL)); 




prlntf CI 00 01 02 03 0< 05 06 07 «h 




prlntf COS C* 0a Oh Oc 0d Oe Of "1 ; 




print f ( ■ 1 23 4 567* febofef \n- ) ; 




prlntf <«^— l — — — — — _ _ _ -). 




prlntf ("— — — — _ M . ^* .) ; 








for lw - offs - fl, m - 1«, x - (where » d>; 




offa < 256; offa +- 16) 

1 




dapcht(i); 




dapchr(offaJ; 




putcit*r('r»; 




•hold - 0; 




If ((x — 16) (4 tx - fread(hold, 1, 16, lx^Jt))) 

( 
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s 

3 



i 

c 



for !<<<p - bold* ♦ x) - 1 - 0, * - bit 

i < mi ♦♦;. **p) 
I 

if 1!11 ft 0x02)) 
p*ch«rC' •); 

djpchr (c - *p ft Oxf f) ; 

putcharC 'I; 

if He < 0x20) II lc> 0x7«U 

•p - -. '; 
« — 3;. 

i*iil« (P—l 

pntcharC •); 

I 

prlntf C a M\n a . bold) ; 
I 
if <n) 

If 4x < IS) 
break; 



prJntf ( a \rb-back. o-oirr fllo. rynoxx flit, •); 

printf (p-prov flU. q^gult.\n-); 

prlntf <"a{ xxxx) -find alpha. xlhh)*hh)-flnd bax, "); 

prlntf ("n u w. .w^sdif y\n") ; 

f f luxMatdcut] ; 

If (!fg»t*(q - bold, 256. atdln) ) 

•bold - 'q'i 
avltch (e - <l*upp*r< a q) ? tolowr«'q) : *q)J 
I 



goto rodlxplay; 
If (c !- (z - "++P 4 Oxff)) 



•1m 



If C«-Mq >- ■ '1 

for 41 - m - 0, p « 
«p+* - a Q++; 
goto naa** rch ; 



loci; ("q >- ' •); **!) 



if (M~hj >- ' •) 

for (1 - i - 0, p - loci. 1 - m - 1; 

(*q >-*•»* *-Hj) 
i 

If C"q — * «» 

CDCttlfKMr 

z - hu^ilCq, x); 

If <1 - 1 - 1) 

i 

*P** ■ *; 
~1; 
r - 0; 
\ 
I 

if (1) 

( 

if <x < 16) 

goto rodltplay; 
loc «* whara ♦ (lorxj)v * 1L; 
« - -1; 

If IfftftOkllApUC. loc, 0)) 

goto xvdlaplay: 
for <£ - Mp - loci) ft Oxff.- ; *+ioc| 
I 

If l(c - gate (Input)) — EOT) 

goto cadlsplay; 
If (e — t| 
braak; 



) 



1; i < 1; 



+i) 



for (1 . 

it He - gxcetinput)) — EOT) 



{ 


**loc; 


J 


goto r«*«*kj 


1 

<4»r0 


- loc 4 OxffffffOCU 


v - loc ft Oxffl; 


V - 1; 




***** 


— 256L; 


goto 


cede; 



rodi^lay: 
r«do: 


c - 'b'; 

nharo •*« 256L; 
x - 0; 




cab* 'b': 

if (c — 'b') 




v- -1; 
if (x < 26) 




( 

f close (lqpur); 

If <!fopvn(arqvlJj. 




J - «*gc; 
break; 




J 
x - 16; 



If (faMkl input, i^n — (»*hera ? S12L : 25611. 0)) 
I 

f close (input); 

If (IfopenftrgvM], MIER)) 

( 

3 - «nje ; 
bra**; 



■fuarg 



0W 



»*here — 255L; 
break; 
m *»•: 
for (p - q - bold; *++p ■— ' '/ ); 
If (<'lxdlqit('p>> (ft 4!lMlpbA4-p))) 

broak; 
I - b%x«»l<«p~ r 0); 
if C'p > ' ') 

z m hexv»l<*p«~t, X)i 

«hlla ("p >- • M 

I 



idilU Cp — 



'I 



1 - hexvalfp**, 0); 
If ('p > * ') 

1 - haxval(*p". 1); 
•q*+ - i; 

if <M1 - q - hold)) 
break; 

If CH {output - fopencargvUI. »cdoO>I I 
1 3*«k <output , O»oro * <long)z. 0) II 
<!f*rlto(hold. I, i, output))) 
prlntf ( •could not ch»ngx UAn'r arcvMll 



FOR THOSE WM 



prlntf feh*^ed Id byc«(x) xtartiriQ », 1); 

printfCat «1* in l«.\n*, 

t+Vftre h. <lorig)t. arqvl)!); 
I 
if (output) 

fcloM(output) ; 
x m 01 

goto rodlJpUy; 
caxo 'q': 

^ . 32167; 
caxo *p a : 

— V 
caxo 'C: 

caxo *n* : 

31 - 0; 

if IC !* 'c') 

V - *1; 
brMk; 
cam *<': 

•yst«n(bold * 1); 

gOtO twdlspliy; 
) 

if (x < 16) 
brMk; 



fcloMUnp<^); 
J 

prlntf (•\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n*) ; 
prlntf C\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n*) ; 
«xtt (0) I 



1 



dspiiyb(v) 
lnt v; 
{ 

v ft- OxOf; 

putch«r(<(v ♦• '0*) > '9') ? (v ♦ 0x27) : v) ; 
) 

dspchr(v) 
int vi 
( 

dxpnytcv » 4); 

dspnyblv); 
\ 

dsplnt iv I 
int v; 
i 

dspchrtv » aj; 

daprhr (v) ; 
) 

baxvaltc. rl 
lnt c, z; 
( 

c ft- Oxff; 

mum (U « 41 f (iadiqlttc) ? (c - •«•) : 

(Ce >- •••) ftft Cc «« *f*)) ? (c - *m* ♦ 10) : 

C(C >- 'A'* ftft (c <- T'l) 7 <c - *k> ♦ 10) : 0)); 
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CRACKING THE OS£ SHELL 



This month I was thinking, what should I 
write about? This question can sometimes be 
answered instantly. Occasionally, it takes 
thought. Many times I page through the 
manuals looking for an idea. Other times it 
comes to me like a flash. This month it hit 
me. Eggs! Now you think, he has gown off the 
deep end. The Job has finally gotten to him. 
But there is something that OS-9 has in 
common with an egg. They are both 
suuounded by a shell. 

There is a difference between the egg and OS-9. 
( Besides the obvious!) The egg's shell is there 
to protect it from the environment. The OS-9 
shell is there to make it accessible to the 
environment. It prompts you for input. It 
executes command lines you enter. It 
allocates memoiy. It handles multi-tasking. 
It redirects Input and output. It even has a 
number of built In commands. Without it. not 
much would be accomplished. 

Many times I find myself referring to things 
that the shell does as OS-9. But in reality the 
shell is special program that reads and 
processes command lines. It brings the OS-9 
system to our finger tips. The shell does this 
by simply printing the familiar OS-9 prompt. 

OS9: 

We input things like commands, programs 
and procedure files. With these we add 
parameters that we want to pass to the 
executing program. And we can append 
ceitain modifiers to be used by the shell. 

The first thing entered after the prompt is the 
verb. This is some command or program that 
we want to execute. It can be any of the 
standard OS-9 commands. Or it can be 



program we want to execute. The shell will 
run it as new process. It will then wait until 
the process is finished. It will print another 
prompt and wait for the next request. For 
such a useful program, it spends most of its 
time waiting . 

The shell uses F$FORK to create a new process. 
A copy of the parameter area is made. The X 
register is pointing to the module name in the 
command line. The shell appends a carriage 
return character to the line. The Y register 
contains the parameter area size. And U has 
the beginning of the parameter area. A call is 
made to F$FORK and a new process is created. 
It is the "child" of the shell that created it. The 
shell or "parent" deactivates itself, going Into 
a WAIT state. 

To test this out. enter "SHELL" a few times to 
the OS-9 prompt. You should have at least 
three shell existing. The one you are in is a 
child of the previous shell or the "yandchild" 
of the the first one. ( if you have entered the 
shell command more then twice, the lineage 
could go way back. ) To see this enter. 

OS&FROCS 

If you have a level 2 system something like the 
following will appear. 



Parnt User Mem Stack 

ID ID Nutnbr Pty Age Sts Slgnl Slz Ptr Primary Module 



2 


1 


128 129 $80 





1 $87E2 SysGo 


3 


2 


128 129 $80 





3 S85E2 Shell 


4 


3 


128 129 $80 





3 $83E2 Shell 


5 


4 


128 129 $80 





3 $81E2 Shell 


6 


5 


128 128 $B0 





6 S05F3 Procs 
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Notice the last shell in the list. It Is process ID 
#5. Its parent Is #4. the previous shell. ID #4's 
parent is #3. who also is the grandparent to # 
5. Now level 1 users will have a listing that 
looks like this, 

Qsr I id pty sta mem pri mod 



4 act 6 Shell 

3 wai 6 Shell 

2 wai 6 Shell 

10 wai 1 SysGo 



This listing is a little more brief, then the last 
one. Se how three shells have created. Again 
the child is # 4. Its parent Is U 3. And finally 
the grandparent is #2. The previous two shells 
are in a WAIT state. Entering the escape twice 
will kill off the two youngest shells. 

CUSTOMIZING INPUT LINES 

Parameters may also be passed to the process 
that the shell started for you. Take a look at 
the following line. 

cc teste -m=4k 

This line has for its verb. "cc". This is the 
module that starts the C compiler. Two 
parameters have been passed to it. They are 
the file to be compiled, which is "test.c" and "- 
m=4k". which tells the compiler to add 4K to 
the stack space. This method makes for 
simple program execution. For example If I 
am using STYLO word processor, I would use a 
line like. 

stylo column 

Stylo would then execute and load the file 
"column". What could be easiei? I have 
worked with other word processors that 
require executing them, selecting from a menu 
the LOAD command, and finally specifying a 
filename. I prefer the first method. ( By the 
way. Stylo will still let you select from the 
menu If you like. ) 

In the C compiler example, I redirected the 
eiror output to a file called "errors". I/O 
redirection is one of the many modifiers 
available from the shell. Here is a more 
complete list. 

! Pipes and filters 
# Specify memory size 
; Command separator 
Sl Concurrent execution 
> Redirect standaid output 
< Redirect standard input 
» Redirect eiTor output 



I covered pipes and filters in a previous 
column. But it never huits to review. The ! is 
used to pipe the output of one process to 
another. This can be very useful, especially 
with filters. Here a simple example, 

list myflle ! strip 

The LIST command usually display the file to 
the terminal screen. However, in this 
example, "my file" is channeled to a process 
called STRIP. It removes unwanted, non- 
printable characters. STRIP prints to the 
standard output path. So "myflle*' is pilnted to 
the screen, minus nuisance characters. 

The memory size specifier is handy for 
changing a process' memory allocation. All 
OS-9 executable modules specify the amount 
of memoiy they need. But in many cases it is a 
minimal amount. This modifier is useful, 
since it lets the shell change the amount of 
memory used. Take the COPY command. It 
uses 4K of memory by default. Now imagine 
doing a single drive copy of a 20K long file. It 
would require at least 6 passes, which is more 
work than I care to do. Append a #20k on the 
line. Now it takes only two passes. Even If you 
have two drives, giving it more memory will 
definitely speed things up. 

Another modifier is redirection of I/O. The 
standard output can be redirected to another 
path wiih the>. If you entered. 

list myflle 

the file called "myflle" in the current working 
directory would list to your terminal screen. 
However, entering it this way: 

list myfile >/p 

will send the same file to the printer. The 
standard output redirection is perhaps the 
most used. 

The other two can prove useful also. 
Redirecting the standard input path can be 
done. It uses the symbol <. What do you think 
this line does? 

solve </dO/instiuctions 

It will start a process, running the debugger. 
" solve". Instead of taking instructions from 
the keyboard, they will come from the file 
"instructions" located on /d0. If you use a tiick 
like this remember to place something at the 



68' Micro Journal 



August "87 



15 



end of the file to terminate the process. The 
last line of the Me used by SOLVE Is "Q". If you 
don't do this, the process may be run forever or 
until you turn thJngs off. 

ITie » Is used to redirect the error output path. 
Normally you want to see the errors generated 
on the terminal screen. But many times It ts 
more convenient to have error go somewhere 
else. When running the C compiler. I will start 
It with a line like: 

cc program.c »eirors 

When the compilation is finished, 1 can check 
for errors in the file "errors". This much 
easier then trying to take notes as the errors 
scroll by. 

The command separator is the semicolon. 
With it multiple commands can be entered on 
a single line. This line: 

copy /dO/Olel /dl/flle2 ; del /dO/fllel ; list 
/dl/nie2 

will copy a Hie from one drive to another. It 
will delete the original. And It will list the 
new one. Everything Js executed concurrently. 
The shell starts the first process and goes into 
a WAIT state. When it Is finished, it starts the 
next one. This continues until the entire line 
is processed. 

BUILT-IN COMMANDS 
AND OTHER USEFUL ITEMS 

The shell has few built in commands. Unlike 
the other OS-9 commands, these won't be 
found in the commands directory. If you 
execute MDIR, you won't see them in the 
module directoiy either. They can be thought 
of as pseudo commands since they are really 
part of the shell. 

Two of them were touched on in last months 
column. They are CHD and CHX. These allow 
you to change working data directories and 
execution directories. Let us say you wanted to 
change disks and use a different execution 
directoiy. Alter inserting the new disk into 
the drive you would enter: 

CHX /DO/CMDS 

To change working directories enter: 

CHD /DO 

This would place you in the top directoiy level 
on the disk In drive /DO. As a rule when first 
booting up the system is placed Into default 
directories. They are usually on drive /DO, 
although this can vary. Users with a hard 
disk may ilnd themselves on /HO. 



Another item the shell provides is EX. This 
command will Execute a program. But it 
causes a process to be created without have an 
extra process hanging around. Here is an 
example. If you entered: 

basic09 

The shell would create the process and then go 
into a wait state. Now it Is sitting there using 
up valuable memoiy, If you are runnJng Level 
1, your are expectally aware of the value of 
memoiy. Now execute the same using 

ex basic09 

This time the shell starts the process, 
BASIC09 and then It dies. There is small 
disadvantage. When exiting the process that 
was executed, there will be no waiting shell. A 
new shell will be created. The new shell will 
be as fresh as if you Just rebooted the system. 

By the way, if the shell (s part of your OS-9 
boot, then using EX removes the shell as a 
process, but still leaves it in the system 
memory. For level 1 this means, you'll 
probably get back only the allocated data area. 
In level 2 the process area is being returned, 
which means an extra 64K. But then again, 
you most likely have more memoTy at your 
disposal and are not overly concerned with 
the Issue. 

This bring us to the next built-in command. It 
is a veiy final sounding one, KILL! What it 
does Is send an "abort" signal to speckled 
process. I find this one useful when I have 
something running as a background task that 
1 want to terminate. Usually I use PROCS to 
get the process ID number. For example, If the 
process ID is 5. 1 would enter: 

kill 5 

Process #5 would then die. There are two 
things to keep in mind. First, only the user 
who started the process can kill it. If youYe on 
a system by yourself, you don't need to woiry 
about this. Second, the process will not die 
Immediately if there is a pending I/O 
operation. Say your program has gone amok 
and Is wildly writing to the disk drive, using 
KILL may not be sufficient to stop it! But in 
most cases, things can be stopped. 

SEIPR is the last built command. It permits 
the changing of a process' priority. In the last 
example, we killed the process #5. Maybe we 
only wanted to slow it down. We used PROCS 
and saw that it has the priority #128. 
Entering; 

setpr5 120 
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will reduce its priority. Processes with higher 
status will get CPU time first. 1 usually find 
things to go along a decent rate, even when 
multi-tasking. So I rarely change the 
priorities. But If you find something is 
bogging down the works, tiy changing a few 
processes' priorities. See what happens! 

There are a few other items of interrest. They 
are: 

W wait for any process to terminate 

* text comment line 

X abort on error 

-X do not abort on error 

P turn prompt and messages on 

-P turn prompt and messages off 

T all input lines are copied to output 

-T input lines are not copied to output 

The shell comes up in certain default modes. 
Normally, it will abort on an error. It 
prompts with the "OS9:" and prints messages. 
Input lines are not copied to the output. This 
last one means that when a line is inputted, 
you see it as it typed without it being re- 
echoed. 

Using these items from the list can come in 
handy. Consider creating procedure files. 
Many times a procedure Hie will be carrying 
out some simple, but otherwise boring task. 
For example, you might have a procedure file 
that is copying the files of one directory to 
another. What if an error occurs? Everything 
after it would not get done. Toss in a -X at the 
start of the procedure file and things will 
continue on course. You might want a T at the 
beginning too! Then everything being done 
will get echoed to the terminal screen. By the 
way. don't forget to undo things when 
finished. I will not go into any great depths on 
these for now. Play around with them, next 
time you are creating a procedure file. See 
what they can do. 

I considered retitling this months column, 
"Everything You Want To Know About The OS- 
9 Shell. But Was Afraid To Ask." I covered it in 
great detail. My intention was to show how 
much you can do with the shell. Many times I 
refer to the things that OS-9 can do. In reality 
the OS-9 provides the means, but the shell 
makes them accesible. The systems has 
things like PIPE. PIPER, and PIPEMAN, but 
the shell creates the pipes for you. The system 
provides multitasking. The shell will set up 
tasks to run simutaneously. I could on, but the 
point is, the shell brings OS-9 to you. 

DOUBLE STRIKE 

This month I put together a simple filter that 
you might want to add to your commands 
directory. ThJs filter takes a listing sent to the 
printer and causes It to be printed twice. The 
second printing of the line is done over the 



printer and causes it to be printed twice. The 
second printing of the line Is done over the 
first. So the line is intensified. If your ribbon 
is in good shape, you'll find the line is darker 
than the usual printing. For a finsihed copy, 
it will look a lot better. If you have a printer 
that does not have a double strike mode built 
in, you might find this one useful. Even if it 
does have double strtke, you might like this 
filter. My printer has a double strike mode, 
but I find certain other features are lacking 
when I use it. For example, I cannot use 
subscripts or super scripts. Plus, when the 
ribbon gets old, this will liven up the copy. 

The filters in the listings are written in C. 
They are simple enough that they could easly 
be translated into assembly code and 
compiled into a object file. I chose C ( and will 
do so more often), because it is universal. The 
code in these listings can compiled on a OS-9 
level 1 or 2 system. They can easily be used on 
the OS-9 68K system. In fact, any system that 
is capable of using filters could probably use 
these programs. Obviously machine 
dependencies and differences in compilers 
should be taken into acccount. If you thought 
a assembler to be a necessary part of your 
system, then a C compiler should included too. 
More and more C will be used. Not Just here, 
but in other areas as well. 

Listing 1 shows the first attempt at double 
strike. It is more obvious approach. It inputs 
a line from the standard input path. It prints 
it to the standard output path, does a canlge 
return and prints it agatn. Finally it does a 
carriage return and a line feed. You must have 
a printer than can respond to carriage returns 
and linefeeds separately. If your printer 
descriptor has been set to execute a linefeed 
with a carriage return, then this must 
changed. This can be done with: 

xmode /p -If 

There are three characters of interest here. 
They are: 

\n BOL 

\r carriage return 

\1 linefeed 

it turns out that the \n and\r aie equivalent in 
OS-9. But I chose to use the more correct 
version. Should this be used on some other 
system, it should work correctly. The line: 

%s\r%s\r\l 

passed to "printf\ prints the line, does a 
carriage return, prints the line again, does 
anther carriage return and a linefeed. 
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I got feeling guilty about the filter. It required 
a particular printer. Your printer may or may 
not be configurable as I have Just described. 
So. after giving it some thought, I present. the 
second version of the double strike projpam in 
Listing 2. This one does not use the carriage 
return as before. Rather it simulates it by 
generating back spaces according to the 
number of characters in the line. This one 
should work on all types of printers. I used the 
ascil representation for backspace ( Octal 10 ). 
If you printer uses something else you will 
have to change this. 

That brings us to the end of another month of 
BASICALLY OS-9. I hope I have helped some 
of you, ellghtened others and given 
inspiration to the rest. If you have any 
questions, comments or gripes send them my 
way. I answer all letters. But please Include a 
self addressed stamped envelope. Until next 
time, have fun! 

LISTING I 



LISTING 2 



00001 

00002 

00003 

00004 

00005 

00006 

00007 

00008 

00009 

00010 

00011 

00012 

00013 

00014 

00015 

00016 

00017 

00018 

00019 

00020 

00021 

00022 

00023 

00024 

00025 

00026 

00027 

00028 

00029 

00030 

00031 

00032 

00033 

line 

00034 



Name: Double. c 
Date: 2-MAY-87 
Author: R. D. Voigts 



Version 1.00 
Original version. 



2-MAY-87 



Function: 

This is a filter for creating 

•'double strike* 1 lines on the 

printer. 

Usage: 

list afile ! double >/p 



tinclude <stdio.h> 
tdefine LENGTH 81 

char line (LENGTH ]; 



main 



whilef gets {line) !- NULL ) 
print f("ls\rl3\r\r, line. 



00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00010 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
00026 
00027 
00028 
00029 
00030 
00031 
00032 
00033 
00034 
00035 
00036 
00037 
00038 
00039 
00040 
00041 
00042 
00043 
00044 
00045 
00046 
00047 
00048 
00049 
00050 
00051 
00052 
00053 
00054 
00055 
00056 
00057 
00058 
00059 

EOF 



Name: Double. c 
Date: 2-MAY-87 
Author: R. D. Voigts 



Version 1.00 
Original version. 



2-MAY-87 



Version 2.00 3-MAY-87 

Uses back space instead of 
carriage returns and linefeeds. 



Function: 

This is a filter for creating 

M double strike* 1 lines on the 

printer. 

Usage: 

list afile ! double >/p 



linclude <stdio.h> 

tdefine LENGTH 81 

tdefine BS w \010 w /* back space */ 

char line (LENGTH j; 

main < ) 
< 

while ( gets (line) !- NULL ) < 
printf {^s-. line ) ,- 
backup{strlen (line) ) ; 
printf < w %s\n", line ); 

) 



Function: 

Prints backspaces according 

to the passed argument. 



backup(i) 
int i; 
< 

register int j; 

for ( j-0,- j<i; j++) 
printf <-%s", BS >, 
) 
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The Macintosh™ Section 
Reserved as a 




A place for your thoughts 
And ours 

Mac-Watch 



Though underpowered, the original 
128k Mac bought gasps of amaze- 
ment because of the new capabili- 
ties It brought to to - the rest of us". 
One of the more exciting of those ca- 
pabilities was the ability to easily 
combine text and graphics on the 
same page. Software producers saw 
the appeal of text-graphics Integra- 
tion capabilities and reacted with 
ever improving software. Graphics 
programs (like SuperPalnt) now 
have better text handling capabili- 
ties, and word processor programs 
(like WrlteNow) contain better 
graphics handling capabilities. 

Ready. Set. Go! 3™ and Its competi- 
tors cany this trend a step further 
by providing a package of powerful 
tools for easily Integrating text and 
Imported graphics Into an attractive 
page design for newsletters, bulle- 
tins, advertisements, and similar 
publications.! he task performed by 
such software Is labeled "desktop 
publishing". Ready. Set. Gol ts one 
of the two best sellers In this field, 
along with PageMaker™: and for the 
moment at least, has more power 
than its closest competition. 

RSG3 piovides for the design of 
pages to Include designated 
text and graphics areas, flow of text 
from column to column In any order 
throughout the document. Import- 
ing and precisely placing graphics 
with automatic text flow-around, 
text editing, and control of text aes- 
thetics. 



Page Layout 

In beginning the design process, the 
user designates the number of rec- 
tangular grids to be shown to aid in 
page layout. For example, a 3 x 3 
grid might be used for a simple 3- 
column page of text, while an 8 x 8 
grid might be used for a more com- 
plex page with headings and graph- 
ics. 

Blocks are then placed on this grid 
and designated to receive text or 
graphics, or to remain as white 
space. An optional snap-to-grid 
feature allows layout blocks to be 
placed quickly and veiy precisely. 
The spacing between text columns 
or text and graphics is automati- 
cally set, 

if the gild arrangement is not pre- 
cise enough for some useis. the 
Specification option may be used to 
set the exact location of text or 
graphics blocks in points, inches, or 
centimeters. 

As originally set up. the various text 
block are totally Independent, but 
RSG3 provides for linking then so 
that text flows from column to col- 
umn, around pictures and from 
page-to-page In any desired order. 
Text can even be made to skip col* 
Limns and /or pages or flow to earlier 
pages. All this Is accomplished 
merelyby cllcldngon each text block 
with a "linker tool" In the order that 
text flow is to occur. 



RSG3 documents may be viewed in 
actual size, half size. 75% size, 
double size or may be sized to fit the 
screen. Editing and rearranging of 
page layout may be accomplished in 
any view with the results if the 
change being lnstantlyvistble. Addi- 
tionally, facing pages may be viewed 
together but changes are not pos- 
sible while in this view. 

Filling In the Blocks... 

Having designed the basic layout of 
the document. It's Ume to add text 
agraphlcs. Text can be generated 
using RSG3*s built-in word process- 
ing capabilities, or prepared 
externally. RSG3 reads documents 
created by Microsoft Word™. 
McWrite™. or any document saved 
In text (ASCII) format. This Is ac- 
complished by selecting Get Text 
horn the menu, then double click- 
ing the chosen text file. The text 
then flows throughout the RSG3 
document around graphics win- 
dows, between columns, and be- 
tween pages in accordance with the 
predetermined linkages. 

ImporUng graphics Is Just as easy. 
The graphics window Is clicked to 
make It active, then Get Picture is 
chosen from the menu. The desired 
graphics file, when clicked. In- 
stantly appeals in position on the 
RSG page. The cropping tool can be 
used to reposiUon the graphics In 
the graphics window. Also, the 
window can be resized to display 
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more or less of the chosen graphics. 
To add a finishing touch, several 
styles and weights of lines may be 
used to separate headers, footers, 
and columns. Also, graphics or text 
areas can be enclosed in circles, 
boxes, or boxes with rounded cor- 
ners in various line widths. Various 
patterns are provided for the lines, 
circles, and boxes and for filling in 
(he interior of graphic objects. 

The real surprise is how little time 
this process takes. If you know (n 
advance how a four- page newsletter 
is to be formatted and have text and 
graphics (lies ready, you can easily 
set up the formulated RSG pages, 
import text and graphics, and add 
finishing touches in much less than 
10 minutes. 

Word Processing 

RSG3 Includes fully competent 
word processing capabilities. While 
not as full-featured as some dedi- 
cated word processing programs 
like Word. RSG 3 can easily handle 
generation and editing of small to 
moderate documents. Features like 
use of clipboard and scrap book, se- 
lecting text, deleting text, moving 
text, copying text, iind and replace, 
and font and style selection work 
essentially as they do in McWiite. 

In addition to above basic word 
processing lealuies, RSC3 includes 
a 65.000 word spelling checker and 
a glossary function. Where this 
program leally shines, however, is 
the near- complete control over text 
aesthetics. RSG has a real-time hy- 
phenation function which when 
combined with the "Justify" option 
can result In veiy smooth text mar- 
gins. While hyphenation In accor- 
dance with a table of mles occasion- 
ally results in errors. RSG compen- 
sates by providing a hyphenation 
exception die tlonaxy. The user may 
pu tasmany wox ds (n this dictionary 
as he likes. 

RSG provides for right, left, center, 
or Justiiled format. The spacing 
between lines and between para- 
graphs can be precisery set. The 
tightening of spacing between 
letterskerning) can be accom- 
plished automatically or under user 
control. The cursor keys on the 
MacPlus keyboard can be used to 
adjustkerningapolntatatlme. The 



kerning function may be used on an 
entire heading or on as little as two 
selected letters. letters may be 
spaced apart (the opposite of 
kerning) in essentially the same 
manner and with the same level of 
control as for kerning. Selected text 
can be shifted up or down from the 
baseline position by a chosen num- 
ber of points. This may be accom- 
plished through use of a dialogue 
box or through use of a MacPlus 
keyboard. RSG provides for thiee 
styles of paragraph indentation. 
Each style can be set as to the 
number of points the affected line is 
offset. 

Some roughness was encountered 
In the use of the word processing 
features. On a number of occasions 
difficulty was experienced In Insert- 
ing the text tool into existing text for 
editing, particularly at the begin- 
ning of lines. Also, in selecting text 
which is partially oiT-screen. the 
scroll function would sometimes 
work only in scrolling from right to 
left. If an Insertion point were cho- 
sen to the left of the target text, that 
portion of the text that is off- screen 
would not always be selected. On oc- 
casion the scroll function seemed 
slow and jerky compared to 
McWrlte. These kinks will not pres- 
ent any major hlnderence to most 
users since text will usually be pre- 
pared In other dedicated word proc- 
essing programs with only light ed- 
iting being done in RSG3. 

Revision* 

Rare Is the composition that will not 
get revised a number of times before 
printing. RSG allows the user to 
make layout changes and Instantly 
see the results. Ifyou do not like the 
position of a graphics box. simply 
select it and move It. Not enough 
white space around the picture? 
Easy to fix) Just select the graphics 
block handle and resize it. Note that 
as the change occurs In the above 
cases, the text automatically Hows 
around the graphics block in accor- 
dance with its new position or size. 
Pages can be Inserted or deleted. 
The linkage of text flow between col- 
umns and pages can be changed. If 
that 2.000-word article lacks an 
Inch filling the designated text 
block, the text block can be appro- 
priately resized and other filler 
material put In the blank space. 



The Manual 

The RSG3"s manual is a slick publi- 
cation which is more like a magazine 
than a typical software users' guide. 
The bare basics are adequately cov- 
ered through a tutorial and various 
reference sections. The RSG3 disk 
contains text and graphics (lies to 
support the user In setting up a the 
sample document for practice. After 
presenting the Introductory mate- 
rial in stylish manner, the utility of 
the manual drops off significantly, 
and the discussions of more ad- 
vanced program capabilities are 
quite sketchy. The 4-page chapter 
on Layout Basics is especially lack- 
ing. Most useis will be dlaapointed 
with this manual. 

Printing 

RSG3 supports printing on the 
Imagewrtter. the Laserwtlter. or any 
other typesetter or printer that un- 
derstands PostScript. Program- 
ming directly in PostScript is also 
supported. 

Will It Pit Tour Mac? 

RSG3 will run on any Mac with at 
least 512k. Wllh difficulty. It can be 
made to work on systems with only 
one disk drive. The spelling checker 
cannot be used with single disk 
systems. RSG3 is not copy pro- 
tected. 

Should You Buy It? 

RSG 3 is a hlghry competent desktop 
publishing program with enough 
power to fully meet most users' 
needs. The power Is complemented 
nicely by its ease of use. For those 
needing a desktop publishing pro- 
gram which they can learn In a 
weekend and use to turn out truly 
professional results right away. 
RSG3 will be a good choice. 



James law 
1806 Rock Bluff Rd. 
Hixson. TO 37343 
(615) 842*5471 
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By: R. D. Lurie 
9 Linda Street 

Leominister, MA 01543 



A PROGRAMMING PHILOSOPHY 

I used to wonder why I neve heaid much about 
\ong and complex programs being wiitten in 
FOKIH. Well, I think that I now know the reason. 
Of couise. laige application programs have been, 
and aie bdng written in FORTH, but tt is usualty 
not oecessaiy for the average task to be such a bfg 
deal. 

In contrast to most other languages. FORTH, 
by tts voy nature, encourages you to write short, 
concise programs which you can later chain to- 
gether to accomplish some major undertaking, I 
guess lhat C is the nearest canvenifcmal language 
to FORTH in making *t easy to chain short pro- 
grams by the use of pipes, etc FOFTTH dosnt 
have the pipes of C, but it doesnt leafly need than. 

As an example of what I mean, cnnslder the 
following case history. I have been Twitting my 
spelling checker in FORTH, converting it from 
assembly language. Ihe dictionary consists of 14 
lists of words in strict alphabetical order. Each list 
holds wards of only one leqgth. such that "RAM* 
and "ROM" aie in the same list, but "key" and 
"keys" are not in the same list. I found that I could 
search the fastest in the least amount of RAM by 
using this dictionaiy structure. 

In making this conversion, I have modified the 
didlonaiy stiuctuie by removing all of the •white 
space" from within each list of woids. Sometimes, 
the white space was a btank arxl scmetlmes it was 
a carriage return. I could have cemoved any of 
these with an editor, but ihe obvious way to do it 
was write a program to do so. 

I also needed to count how marry words there 
were in each list beginning with each letter of the 
alphabet. Alter trying to do it by leading the screen 
and getting a different count each time. 1 wrote 
another program 'strictly for this purpoa. 

I needed to make several other changes and 
notations about each list, so I wrote a little pro- 
gram to do each one separately, as I needed the 
tnfonnation. 

AD of this could have been conblned Into one 
program which was much shoiter than the sum of 
the ler^ths of each of these little \iulity pro- 



grams; but It would have taken me much longer to 
write and debug tt than all of the short ones did. 
Besides. I now have several additions to my tool- 
box ready the next time I need to do some odd-ball 
job. 

in summation, my FORTH programming phi- 
losophy is to write several shoit programs, rather 
than one long program, whenevo* possible. F\ir- 
thermore. I never throw away any debugged defi- 
nition, since I will suiery find more use for it in the 
futuie. 

two useful umrnES 

I would like to share with you a couple of one- 
screen utilities that I find myself using quite a lot. 
Qx 

The first one is called QX and Is shown in screen 
#62. This was inspired by the QX utility supplied 
by LMI in their Z-80 FORTH; however I have made 
a couple of changes in it which make tt fit more 
comfortably inlo my programming habits. QX 
stands for Quick indeX, and piuduces a screen 
index in a compressed form. Figure 1 is an ex- 
ample of Its use with the program NO<SP> . which 
I will describe later. 

One of my main uses for QX is in finding the 
first empty screen tn a block of screens that I am 
working on. If I am writing a long program. I make 
a habit of reserving blocks of screens far spedJQe 
Job categories* such as file I/O and help screens. 
I need to know the nod available screen in a block 
when I am zeady to add anotho- help screoi. etc. 
QX is vei y quick at doing that and usually does not 
cause something useful to scroll off the screen 
while it is working. Of couise, QX does the tradi- 
tional jobs that INDEX does. Just in less space. 

QX is called in the traditional FORTH manrcn 

<flret-screen*> <last-screen#> QX 

Since the algoilthm may not be immediately 
obvious from the listing (screen #62). I will spend 
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sctdc time explaining it The initial CR simply 
forces printing to begin on a fresh line. This forces 
everything to line up in neat columns, which 
makes the display easier to read. 

Line #2 may be the most confusing pait of the 
definition. Ihe initial serves to Initials the 
column counter, which never leaves the Data 
Stack. Ihe definition probably would have been 
easier to Wkjw if a VARIABLE had been assigned 
for the counter, but I wrote the definition long 
before I ever thought that it mjght beanre the 
subject of a description in 68' MJ. Besides, this is 
a good place to Illustrate a Data Stack position 
being used to hold a counter. 

Ihe ROT ROT in the rest of line #2 simply shlfls 
the various numbers so that the (counter) winds 
up at the bottom of the Data Stack. 

Ihe phrase 1+ SWAP adds on to the value of the 
last screai number and then exchanges the two 
numbers so that they aie in the proper onder for 
the DO ... LOOP . 

By setting the DO ... LOOP limits in this way, 
the loop tndex, I • assumes the number value of the 
desired sotol Iherefore. I can be printed with a 
formatting statement 4 J* so that it always occu- 
pies 4 spaces, rght Justing. SPACE skips one 
space as a further aid In formatting. 

The real work 1$ done in line #5. 1 BLOCK loads 
the proper screen into RAM and leaves Its starting 
address on the Data Stack. This address 1$ used 
with the 14 (as the count) as the parameters for the 
TVTE axnmand. Ihe count of 14 is not truly 
arbitrary, since it produces the most infonnation 
In four columns on and 80- character ajeoi If 
you change it, be sure to adjust the number of 
columns printed: otherwise, you can get quite a 
Jumbled mess for you display which you will not be 
able to read. 

lines #6-#9 act as a column counter. I needed 
this because one of my printers cannot be made to 
do a carriage-return without an explicit Instruc- 
tion. If you use an 80-column display and a printer 
which automatically returns after printing 80 
columns, then you do not need these lines. 

DUP makes a copy of the column counter, 
which 1$ now at the top of the Data Stack. 4 MOD 
divides the count by 4 and saves the remainder on 
the top of the Stack. The ronalnder 1$ incremented 
by l and axnparal to 4, the dsHed number of 
columns. Ranemba-, the results of 4 MOD must 
range 0-3. 1 put in the 1+ so that I could make the 
comparison diraUy to the desired number of 
columns, so that I would underhand the algo- 
rithm several months later (like now. for ir^ance). 

I any case, if the incremented counter does 
equal 4, the IF portion of the ocgKiltional phrase 1$ 
execute! This constets of sending a CR to the 
display, dropping the old value for the counter, 
and starting a new count at 0. 



Otherwise, the ELSE part of the cnnJitfcmal 
phrase 1$ executed. In this case, the column count 
is tr*ren*inied by 1. and a SPACE is sent to the 
display for formatting purpose 

Ihe 7BRK and 7LEAVE are sorrawhat implem- 
entation dependent, in that they are not cnnxrmn 
to aD verekro of FORTH. 7BRK tests the keyboard 
for a tay-press. and 7LEAVE exits the DO ... LOOP 
if one is detected. Ihese two are not nfrnrary, but 
do provide a convenient panic-button. 

DROP clears the no longer needed counter from 
the Data Stack and CR forces a new line, again in 
the interest of neatnesft. 



9L 



Ihis utility was originally written as a means for 
get t trig the maximum number of programming 
lines displayed on the screen or printed on a page 
without having to make a specially edited copy of 
consecutive S3*Ens. QL (shown in screen #61) 
produces the type of output shown in Figure 2. 
Essentially, QL strips all blank lines from a 
screen. Ihis makes it harder to read and under- 
stand, but it cuts way down on the number of lines 
required to show a group of screens. Normally. I 
prefer to have only one definition on a sown, and 
this results in a lot of empty lines. QL gets rid of 
these and gives me a nicely condensed Quick list. 

As with QL QX uses the traditional FORTH 
command line: 



<flret-ffleen#> <last-screen#> QL 

Line #1 serves to print a heading which con- 
tains the current date. .SYS-DATE is similar 
enough to .DATE (68* MJ, 11 /86) that I win not 
take the space to describe It here. 

lire #2 sets up the "outside" DO ... LOOP which 
has the soeoi numbers as its parameters. Some 
of you may find it confusing that the same loop 
Index 1$ called I in line #3 and J in line #5. Ihis is 
the FORTH amvmtkm that the index for the cur- 
rently executing DO ... LOOP is called I . and the 
index for the next outer DO ... LOOP is called J . 
Seme versions of FORTH do not have access to this 
outer loop counter, so you will have to keep It In a 
separate variable. On the other hand, some 
FORTHs. such as FF9 allow one mare level of 
nesting availability by having a K . By the way, this 
has nothing to do with the actual number of DO ... 
LOOP * which can be nested: it Just refers to how 
many Indices that can be called from within a 
given DO ... LOOP . 

Ihe soem number 1$ printed in line #3 in the 
purely conventional manner. 
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The DO .„ LOOP In line #4 is set up to pilnt a 
maximum of 16 lines. At least. it will certainly look 
at 16 lines, even If none aie printed. 

J BLOCK loads the current screen Into RAM 

buffer fran disk and leaves the starting address of 
line no on top of the Data Stack. I is the current line 
number, so 1 64 • multiplies the line number by the 
length of a line, and + adds this number to the 
buffer address already on the Data Stack. In this 
way, each Iteration (/the inner DO ... LOOP places 
the starting addnss of the current line onto the 
top of the Data Slack. 

The 64 -TRAILING tells the computer to start 
counting back Gum the addiess on the stack plus 
64 until the first non-blank is encountered. When 
this happens, leave the number of remaining 
characters in the line as a count on the top of the 
Data Stack. It is a peculiarity d* -TRAILING that 
the addi^s which was already on the Data Slack 
is not lost, which is an exrej*ion to the normal 
activity of a FORTH ward. 

DUP makes a copy (/the count left by -TRAII^ 
ING to be used as aflag for the following IF ... ELSE 
... THEN conditional. Since Is iA»ntiral to 
FALSE, and non-0 is idailJcal to TRUE, the count, 
itself, can be used as the flag. This is considered 
good FORTH practice, but can be confusing to 
beginners. We needed to duplicate this number, 
since it is to be used as the count for a TYPE 
command later on 

If the count was greater than 0. line #7 prints a 
formatted line number as three spaces, right Jus- 
tified A SPACE is then printed as pait of the 
output formatting. TYPE then prints the charao 
ters which were previously found. A CR finishes 
the output for this line of text. 

Had the count been 0, the ELSE branch (/the 
condlliana) would have used 2DROP to clear the 
address and count for this line firm the Data 
Stack 

Renumber that two DO ... LOOP 's were nested, 
so we need to end the deflnitkm with LOOP LOOP 



NO-<SP> 

I wont spend a lot of time with a detailed 
description of NO- <SP>, since virtually all of the 
definitio ns have been flcmlbed in a previous 
column, HowcvCT. I do want to point out the major 
features of the program and give a short descrip- 
tion of the algorithm* 

As I cncnlioned previously, the purpose of NO- 
<SP> was to ranc*/e aH *whii£*space~ from a list of 
words, but. of course, it would woik with any text 
file. 

The program reads the file into RAM for proc- 



essing. This is easy, because I have plenty of 
unused RAM with this short pepgram. 

I need two pointers and two counters. R- 
POINTER is the read pointer and W-POCVTE3* is 
the wrtte-polnier. TALLY counts the total number 
of characters and DROP-TALLY counts the white- 
space characters as they are skipped. A character 
is read at R- POINTER and R-POINTER Is Incre- 
mented. The character is checked for \vhlie- 
space w and ignored if it is a <SP> or a cCR>. and 
DROP-TALLY is Incremented. 

If the character is not a <SP> or a cCR>. it is 
stored at W- POINTER and W-POINTER is incre- 
mented. 

Notice that R-POINIER gradually drifts away 
fran W-POINTER by the count stored in DROP- 
TALLY. This diffCTOice is eventually used by 
CLEAR-SURPLUS to erase the surplus characters 
left after NO-<SP> has done the first part of its job. 

Finally, the finished file is written back to disk 
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This month we will enter the example program gtven 
last month and debug It. followed by making a blnaiy 
file that can be run as a command from the shell 

Change to a dlrectoiy that you wish to use for this 
example and enter the editor by typing : 

$se 

This will start the editor and provide you wtth a 
blank screen, enter : 

new exl 

You will now given a line number of one (In half 
brightness If your terminal supports this) and the 
cursor will be at the first position of the line. Start 
typing the first line of the program, terminated by a 
carriage return. If you have ever used Stylograph then 
you should pick up the use of this editor quite quickly, 
as they share many of the same features. You can refer 
to the reference sheet for the editor to learn the editing 
commands, you can also use the built In help facility If 
you forget what control key to use. 

You can Indent the program as shown, or use any 
other method you feel comfortable with. Many people 
put reserved words in upper case, but it does not matter 
to the compiler. 

When you have finished typing In the program, go 
back to command mode. A smart first step is to save the 
program, simply enter : 

s 

Which will save the program under the default name 
of "exl". To check for syntax errors (such as typos), enter 

$pc -® 

This will compile the program In the edit buffer 
(thats what the "&" means) but will not generate object 
code or a listing. If the compiler finds any errors, it will 
show where the error is (pointing to It's best guess of 
the item In error) and ieil you what the error is. You can 
continue with the compilation by entering any 
character other than M Q M (or "q°). Alter the end of the 
compilation, or If you enter Q after any eiror. you will be 
returned to the editor with the cursor pointing to the 
location of the last error. You can now make the 
necessaiy changes and then enter control N to move 
the cursor to the previous error In the file until there are 
no more errors in the stack. Both the compiler and the 
assembler can stack up to 20 error locations In this 
manner. 

When you can compile the program with no errors, 
you are ready to move to the testing stage. On your 
successful compilation, note the value it shows for 
"stack" at the end of the compilation. Save the corrected 
version of the program and exit the editor by entering 
save and quit : 

sq 



In order to take advantage of the integrated package 
it is necessary to setup a control file that contains all 
the information needed to compile, assemble, debug, 
and link your program. The linkage creator is the 
program that produces this control file. Enter the 
linkage creator by entering : 

$lcexl 

The linkage creator will tiy to open the compiled 
relocatable object code for the program °exl " to tiy to 
determine the stack size required. Since we haven't 
actually produced this file, it will inform you that it can't 
determine the stack size. No problem, since you 
remembered the value from 2 parayaphs above, light? 

There are two main modes, automatic setup, which Is 
designed for programs that will run under OS-9, and the 
second mode, which is designed for stand-alone 
programs. This program is to run under OS-9. so we 
select automatic mode. In the example program there 
are no bu tiers that might need to be expanded, so we 
can set a fixed stack size. Other programs, especially 
those that use the heap, need to have a way to specify 
the stack/heap size when they are run. This is done 
using the "Z" command line option, as is done for many 
of the programs in the pascal package. Since we do not 
need this flexibility, we will answer NO when asked If we 
want to handle the Z option. We will next be prompted 
for the stack, heap, and vaitb size to allocate, since the 
compiler said that we needed $2FC bytes, lets specify 
$400 bytes to leave room for operating system calls and 
such (do not enter the '$". It Is assumed). 

We are next prompted for the llbraiy directory to use. 
if installed as suggested, we would specify "/dd/". We are 
next prompted if we want to load other pascal modules, 
for modular programs. This example is veiy small and 
only needs the main program, so we answer with a 
carriage return. The linkage creator allows up to 40 - 80 
character lines to spectfy modules, which should 
handle even the largest project. In a similar manner we 
are prompted for additional assembly language files, we 
have none, so we answer witb a carriage return. Next. 
additional libraries can be specified, this would Include 
such items as graphics or floating point processor 
libraries. We don't have any. so we answer with a 
carriage return. 

We next are asked for linker command line options, 
lets say we want the load map to be written to disk, all 
we need to do is specify the file name as the command 



'66' Micro Journal 



August *87 



25 



line option, answer wlih "exLmp". "Map options" allows 
us to specify the format of the load map. lets use "F* for a 
full map. Next we are prompted for Include files, we 
aren't using any. so answer with a carriage return. 

Next we have a prompt for debugger command line 
options, the small example should not require any 
special memory handling, so we answer with a carriage 
return. The next prompt Is for the target debugger, 
which we will not be using, so Just answer with a 
carriage return. 

The next two prompts allow multiple options, one 
option set per line. The first is for the compiler, this is 
used to provide us with a menu of standard options 
when compiling from the pascal shell We know we will 
want to compile the example for use with the debugger, 
so lets make the flr9t line "-d", 

Later, we want relocatable object code so we can 
generate a loadable OS-9 module, so make the second 
line m -?\ We would also like a listing, so we might have 
something like Mp62ftw96 /p". wilh variances due to 
your printer specifications, of course. We can combine 
generating code and listing of course, into something 
like "-dlp62ftw96 /p*. When you are done putting in 
options (10 maximum), just enter a carriage return. The 
same procedure is used for the assembler, with likely 
options of "-o". Mp62ftw96 /p". and ' f -olp62ftw96 /p". 
Last, we are prompted for screen editor options, 
normally the only time this is done is for large modules 
that need additional screen editor butter space, enter a 
carriage return for this example. 

The linkage creator now writes out the control file, 
called a "shell file", which has a suffix of M .sf ' and the 
same file name as the pascal source "exl.sf. it also 
writes an assembly language source file that is used to 
run the pascal program from OS-9. This file has a suflbc 
of M .ps". If we were writing a si and alone program the 
code from the compiler is the same, only this assembly 
language file is changed to operate under the different 
environment, we will cover that another month. The file 
"exl.ps" is then assembled into "exl.pa". ready for 
linking when we get to that step. 

As a 6\i£i\mnry of what was entered for the linkage creator : 

OmegaSoit Linkage Creator Version 1.21 

Copyright 1987 by Ceitiiled Software Corporation 

Global stack size not determined 

autosety ?y 

Process Z command line option ? n 

Stack, heap, and Varlb size : 400 

Ubraxy directoryname : /dd/ 

Other pascal files : 

Other assembly files : 

Other library files : 

Linker command line info : ex l.mp 

Map options : f 

Include files : 

Debugger options : 

Target debugger options : 

Compiler options : -d 

Compiler options : -r 

Compiler options : -Ip62ftw96 /p 

Compiler options : -dlp62ltw96 /p 

Compiler options : 

Assembly options : -o 

Assembly options : -Ip62ftw96 /p 

Assembly options : -olp62ftw96 /p 

Assembly options : 

Editor options : 



OmegaSoft 68000 Assembler version 1.21 
Copyright 1987 by Ceitiiled Softwaie Corporation 
Errors : Code : 0QA8 Data : 0000 Varib : OOOOIable 
14 of 944 

Code assembled 



The next step Is the Pascal Shell program which can 
be stalled by entering : 

$ ps exl 

It first reads the "shell file" to build a list of pascal, 
assembly, and Include files. This Is a menu driven 
program with the following options : 

Edit module 

Compile module(s) 

Assemble module(s) 

Debug 

Link 

Run Chain 

Background chain Idle 

Exit Pascal Shell 

Target debug 

Execute linked program 

Beep on termination 

Restart 

Review 

Abort background 

Pass command line to shell 

You use the same keys for cursor movement as you 
did for the editor (setup during Installation). Hit a 
carriage return to make a selection from the menu. 
Rather than getting straight down to business, lets 
spend some time learning what each of the selections 
will do for us. 

Edit module - you will be shown a list of files that can 
be edited. These will Include pascal source, assembly 
source, and Include files, which were specified In the 
linkage creator. The normal cursor control keys are 
used to move fiom one file to another. Enter a carriage 
return to exit back to the main menu. Enter a "S" to edit 
the selected file. 

Pascal Hies will have a "P-" In front of them, likewise. 
"A-" for assembly, and "!•" for include and misc. files. 
When you are done editing the selected file, you will be 
back In this menu, you can enter T" to flag ihe file as 
modified, which will change the "x~" to "x*". There is also 
an automatic mode that will flag files that have been 
modified since the last "chain 1 *, or based on the update 
time of a file, similar to a "make" utility function. 

Compile module - you will be shown a list of pascal 
source files, for each file you can skip It, or enter "S" to 
select It for compilation, or "FT to reset It so It will not be 
compiled. You can also enter "A" which will set all 
flagged files for compilation. These compilations will be 
queued and done In the "chain*. 

Assemble module - same as compile, except you are 
shown a list of assembly source files. 

Debug - Puts the debug command Into the queue so 
you will enter the debugger after the selected files have 
been compiled/assembled. You can use the default 
command line options, specify new ones, or cancel 
queuing of this command. 

Link - stmilar to debug, will run the linking loader 
after compilation and assembly. 
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Run Chain - This Is a mulllplc step operation. It first 
complies all selected pascal source files, then 
assembles all selected assembly language files, and 
then does the link, debug, or target debug If they were 
selected. If at any step an error occurs, It will stop and 
return to lhe main menu. You can then fix the erior, and 
run the chain again. It will restart at the step that 
caused the error. 

Background Chain - This will do compilations and 
assemblies In background, allowing you to do further 
editing on other files in foreground. Like the foreground 
chain. If an error occurs. It will stop and display an 
"error status". When it is done, you will find on RAM disk 
(or wherever you want It) a Hie that contains all of the 
slgn-ons and error messages (If any) generated by the 
compilations and assemblies. This IUe name will show 
up on the edit file menu If you need to Inspect 1L 

Exit Pascal Shell - returns to OS-9. 

Target Debug - similar to debug, will run the target 
debugger after compilation and assembly. 

Execute linked program - will execute the linked 
program, you will be prompted for a command line to 
use. 

Beep on termination - allows enabling of a "reminder 
beep" at one second Intervals once the chain has 
terminated. 

Review - shows what will occur when lhe chain is run 
(compilations, assemblies, etc.). 

Restart - resets all queues and re-reads the shell Hie. 
Useful alter you edit the shell file for any reason. 

Abort Background - stops the background chain 
once It has finished the step It Is doing. 

Pass command line to shell - allows you to run OS9 
commands from within the pascal shell (directory 
listings, etc.) 

Our first step will be to compile the example 
program for use with the debugger. Position the cursor 
to "compile module" and enter carriage return (CR). You 
will be shown the default options, move the cursor to "- 
d" and hit carriage return. Ihls will move you to the Jlle 
selection menu. The cursor will be positioned to "exl". 
enter a "ST. Enter a CR to exit back to the main menu. 

Position the cursor to "debug" and enter CR, We will 
use the default command line option, so enter CR, 
Position the cursor to "Run chain" and enter CR The 
compilation will be done, and then the debugger will be 
started and the file loaded. At this point we will be In the 
debugger "flier" mode. Enter "P" followed by CR to enter 
"pascal 1 * mode. 

Since this program uses the standard Input and 
output paths only, running It is veiy simple. Just enter 
M G* and a carriage return. As a simple test, enter : 

test: dob $400. fill out the bufler 



It will then print ; 



test ds.b $400* All out the buQer 

Enter: 

end 

followed by a control Z and then carriage return. 
Itils will generate an EOF which will stop the program. 
To have it do something useful, we need to redirect lhe 
standard Input and output paths, this Is done with the 
"set command line" command, enter : 

P> sc 

$> </dd/deis/funcs.a >/dd/pdef/funcs 

This will convert the funcs.a defs Hie Into a RA 
compatible include IUe called funcs in the pascal 
definition directory "PDEF\ Enter H G" again followed by 
a canlage return. It will then run the program, but you 
will not see what Is going on since the output Is 
redirected to a file. 

There are many powerful debugging capabilities 
available, both at the pascal and assembly language 
levels, we will go over some of Ihese next month. Next, 
enter with a CR to exit the debugger, which returns us 
to the Pascal Shell main menu. Co back and select 
compilation again for [lie exl. except select the option 
"*r*\ this will generate relocatable object code. Then. 
Instead of selecting debug, select link. Run the chain. It 
will compile the example program generating 
relocatable object code, and then link It with the stack 
setup code (exl.ps) and the runtime libraries to 
generate file file "exl.lo" In lhe current data dliectoiy. 

You will then be back in the main pascal shell menu. 
To tiy lhe linked version of our example, select 'execute 
linked program", and when prompted for the command 
line, enter : "</dd/defs/lo.a >/dd/pdef/lo" so we will 
convert lhe lo.a file. After this Is done, you might want to 
add this little utility to your commands directory. Select 
"pass command ..." and enter : 

$copy exl.lo /dd/crnds/exl 

You can then run this program any time you want by 
using the name "exl". You can now exit the pascal shell 
by positioning the cursor to "Exit Pascal Shell" followed 
by a carriage return. 

Note that the ille lo.a contains two symbols with the 
same spelling. PD_NAME and PD_Name. this does not 
cause a problem In R68 because it follows the "C" 
convention of treating upper and lower case as 
different. This will not work for RA because it uses the 
Pascal convention of treating upper and lower case as 
the same (except in string literals). I suggest changing 
PD_Name to PD_NameP. 

OmegaSoft is a registered trademark o/ Certified 
Software Corporation, QS*9 and OS-9/66000 are 
trademarks of Mlcioware Systems Corporation. 
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The Mathematical Design of Digital Control Circuits 

By: R. Jones 

Micronics Research Coip. 

33383 Lynn Ave, Abbotsfoid. B.C. 

Canada WIS \E2 

Copyrighted © by R. Jones & CPI 

The major part of this tutoxla] ts based on a series of lectures 1 began In the early 
60s. These 2-hour lectures (covering a period of 25 or 26 weeks) were delivered to 
groups composed of a mix of engineers, technicians and non-technical persons, some 
with veiy little knowledge of mathematics and others with an extensive grasp of the 
deepest aspects of (he subject. And yet. because the "math* of digital logic is so 
unlike ordinaiy mathematics. It could truly be said that they all started oil on an 
equal fooling. 

Therefore to those of you who may be wondering whether you'll be able to master the 
lessons to come. 1 would say "Be of good cheerl If you can count to 100 or so. and 
have a fairly logical mind, you can do it." Just be sure NEVER. EVER, to move ahead 
until you have mastered each stage, and above all - and I cannot stress this too 
strongly - DO the exercises and self-tests 1 shall be providing along the way. 

The trouble with "logic" ts that vexy often the subject-matter is so logically apparent 
that the student tends to say to him/herself "Yes. 1 see that. It's so obvious'" and to 
skip giving a point the deep attention It really deserves. Words are treacherous - so 
examine each statement carefully before accepting it as "logically so". 

For example, let's take a look at the following set of logical statements. They also 
happen to be mathematical, but let's concentrate on the "logic" : 



1 . Tom has 95 marbles. 

2. Dick has 4 more marbles than Tom. 

3. Therefore Dick has 99 marbles. 



Now. If we know for sure that Statement 1 Is TRUE, and that Statement 2 ts TRUE. 
then no-one will deny that Statement 3 MUST also be true. Obvious? Take a second 
look before saying "Yes". If we're all agreed* let's move on, Most folks would also 
concede that the whole structure of this set of statements Is consistently and logically 
TRUE* In that we don't necessarily have to relate to Tom and Dick. We could replace 
Tom* with *Maiy\ Dick' with Santa Claus and 'marbles' with toys', and our logical 
conclusion would still be TRUE. Or how about : 



1. Uncle Fred has 95 dollars. 

2. Aunt Minnie has 4 more dollars than Uncle Fred. 

3. Therefore Aunt Minnie has 99 dollars. 



Again, provided that Statements 1 and 2 axe TRUE, then It follows that Statement 3 
MUST also be true. As long as the substitution of 'Uncle Fred* for Tom', 'Aunt Minnie* 
for 'Dick' and so on, is consistently carried out. the logical conclusion remains TRUE. 

Continued on pigc 37 
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unified, uscr*defined HO; produce* RDMable Code; Procedures and 
Modules (including pre -com piled Module*); many Types" up to 32 
bit Integers. 6-digit Real Numbers, unlimited sized An ays (vedoo 
only); Interrupt handling; long Variable Names; Variable 
Initialization; Include directive; Conditional aompiling; diiect Code 
inte/lifisa* control of the Stack Pointer, etc. Run -Tune subroutines 
inserted u called during c«*npilatiori Normally products 10% less 
eode than PU9. 

F. Sand CCF. $195.00 



KANSAS CITY BASIC from S.E. Media - Basic for Color Computer 
OS-9 with many new commands and sub-functions added. A full 
implementation of the IF- THEN-ELSE logic is included, allowing 
nesting to 255 levels. Strings are supported and a subset of ihe 
usual siring furtoions such as LEF1S. RIGHll MID$. STRINGS, 
etc are included. Variables are dynamically allocated. Also 
included am additional features such as Peek and Poke. A must for 
any Color Computer user running OS-9. 
CoCoOSJ $39.95 

C Compiler from Windrush Mkro Systems by James McCceh. Rdl C 
for FLEX* SK°DOS except oilfields, including an Assembler. 
Requires the ISC Relocating Assembler if user desires to implement 
his own Libraries. 

F t S and CCF .$295.00 

C Compiler from introi - Full C except Doubles and Bit Fields, 

streamlined for the 6809. Reliable Compiler FAST, efficient Code. 
More UNIX Compatible than mof L 

FLEX. SK*DOS t CCF t OS-9 (Level II ONLY). U • $575DO 

PASCAL Compiler from Lucldata ~ ISO Based P-Code Compiler. 
Designed especially for Microcomputer Systems. Allows linkage to 
Assembler Code for maximum flexibility. 

F, S and CCF 5" - $99.95 F.S 8~. $99.95 

PASCAL Compiler from OmegaSofl (now Certified Software) - For 
ihe PROFESSIONAL; ISO Based. Native Code Compiler. Primarily 
for Real -Tune and Process Control applications. Powerful; 
Flexible. Requires a "Motorola Compatible" Relo. Asmb. and 
Unking Loader. 

F. S and CCF - $425 XX) - One Year Maim. $100.00 
OS.9 68000 Version * $900 DO 

KBASIC « from SB. MEDIA - A "Native Code" BASIC Compiler 
which is now Fully TSC X BASIC compatible. The compiler 
compiles to Assembly Language Source Code, A NEW, 
streamlined. Assembler it now included allowing the assembly of 
LARGE Compiled KBASIC Programs. Conditional assembly 
reduces Run. time package. 

FLEX. SK+DOS. CCF t OS-9 Compiler /Assembler $99.00 

CRUNCH COBOL from S.E. MEDIA - Supports large subset of ANSU 
Level I COBOL with many of the useful level 2 featurea. Full 
FLEX. SK*DOS File Structures, including Random Files and the 
ability to process Keyed Files. Segment and link large programs at 
runtime, or implemented as a set of overlays. Ihe System requires 
56K and CAN be run wiih a single Disk System. A very popular 
product. 

FLEX. SICDOS, CCF - $99.95 

FORTH from Steams Electronics - A CoCo FORTH Programming 
Language. Tailored to the CoCol Supplied on Tape, transferable to 
disk. Written in FAST ML* Many CoCo functions (Giaphies. 
Sound, etc.), Includes an Editor, Trace, etc, Provides CPU Carry 
Flag access Jbflily, Fast Task Multiplexing, Qean Interrupt 
Handling, etc for the "Pro". Excellent "Laming" toot! 
Color Computer ONLY - 150.95 
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FORTH BUILDER is a stand-alone target compiler (cross compiler) for 
producing custom Forth systems and application prognms. 
Ail or the 83 -standard defining words and control structures arc 
recognized by FORTH BUILDER. 

FORI II BUILDER is designed to behave as much as possible like 
a resident Forth interpreter/compiler, so ihat most of the 
established techniques for witting Forth code can be used without 
change. 

Like compilers for other languages, FORTHBUILDER can operate 
in "batch mode". 

Ihe compiler recognizes and emulates target names defined by 
CONSTANT or VARIABLE and is readily extended with 
"compile- time" definitions to emulate specific target words, 
FORTHBUILDER b supplied as an executable txmmand file 
configured for a specific host system and target processor. Object 
code produced from the accompanying model source code is 
royalty-free to licensed users. 
F.CCF.S- $99.95 

DATABASE ACCOUNTING 

XDMS from Westchester Applied Business Systems 

FOR 6809 FLEX.SK*DOS(5/8 w ) 

Up to 32 groups/fields per record I Up to 12 character filed name] Up to 
1024 byie records! User defined screen and print coniroll Process 
files! Form Tilesl Conditional execution! Process chainingl Upward/ 
Downward file linkingl File joiningl Random file virtual paging! 
Built in utilities! Built in text line editor I Fully session orientedl 
Enhanced forms! Boldface, Double widih. Italics and Undeiline 
supported I Written in compact structured assembterl Integrated for 
FAST execution! 
XDMS-IV Data Management System 

XDMS4V is a brand new approach to data management It not only 

permits users to describe , enter and rctr eve data, but also to process 
entire files producing customized reports, screen displays and file 
ouepoL Processing can consist of any of a set of standard high level 
functions including record and field selection, sorting and 
aggregation, lookups in other files, special processing of record 
subsets, custom report formatting, totaling andsubtotaling, and 
presentation of up to three related files as a "database" on user 
defined output reports. 
POWERFUL COMMANDS I 

XDMS-IV combines the functionality of many popular DBMS software 
systems with a new easy to use command set into a single integrated 
package. WeVe included many new features and commands 
including a set of geneial file utilities. The processing commands 
are Inpui-Process-Omput (IPO) oricroe which allows almost instant 
implementation of a process design. 



SESSION ORIENTED! 

XDMS-IV is session oriented, Enter "XDMS" and you arc in instant 
command of all the features. No more wailing for a command to 
load in from disk I Many commands arc immediate, such as 
CREATE (file definition), UPDATE (file aditor). PURGE and 
DELETE (utilities), Oihers are process commands which are used to 
create a user process which is executed wiih a RUN command 
Either may be entered into a "promts" file which is executed by an 
EXECUTE statement Processes may execute oihcr processes, or 
themselves, eiiher conditionally or unconditionally. Menus and 
screen prompts are easily coded, and entire user applications can be 
run without ever leaving XDMS-IV 

ITS EASY TO USEI 

XDMS-IV keeps daia management simplel Rather than design a complex 
DBMS which hides the true nature of the data, we kept XDMS IV 
file oriented. The user view of data relationships is presented in 
reports and screen output, while the actual data resides in easy to 
maintain files. This aspect permits customized presentation and 
reports without complex redefinition of the database files and 
structure. XDMS-IV may be used for a wide range of applicaiions 
from simple nscord management systems (addresses, inventory ...) 
to integrated database systems (order entry, accounting...) 

The possibilities are unlimited,,, 

FOR 6809 FLEX-SK*DOS(S/8") $249.95 



ASSEMBLERS 

ASTRUK09 from S.B. Media - A ^Structured Assembler for the 6809" 
which requires the TSC Macro Assembler. 
F,S f CCF + 599.95 
Macro Assembler forTSC - Ihe FLEX, SKMXJS STANDARD 
Assembler 

Special - CCF $35.00; F. S $50 W 
OSM Extended 6809 Macro Assembler from Uoyd UO. - Provides local 
labels. Motorola S-records, and Intel Hex records; XREF. 
GoieOrate OS-9 Memoiy modules under FLEX, SK*DOS. 
FLEX, SK+DOS. CCF. OS 9 $99.00 
Relocating Assembler/Linking Loader from TSC. - Use with many of 
the C and Pascal Compilers. 
F,S. CCF $150 00 
MACE, by Graham Trott from Windrush Micro Systems - Co-Resident 
Editor and Assembler; fast interactive A.L Programming for small 
to mediums bzed Programs. 
F,S,CCF.$75.00 
XMACE - MACE w/Cross Assembler for 680CV1/2/3/S 
F,S, CCF- $98.00 



O m OS 4k S - SK*D0S 
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UTILITIES 

Baiic09 XR«f from SB, Media - This Basic09 Cross Reference Utility 
is a Basic09 Program which will produce a "pretty piintcd" lilting 
with each line numbered, followed by a complete croit referenced 
listing of all variables, external procedures, and line numbers called. 
Also includes a Program List Utility which outputs a fast "pretty 
primed" listing with line numbers. Requites Basic09 or RmiB. 
<* CCO obj. only - $39.95; w/ Sourct - $79.95 

BTree Routine* - Complete set of routines to allow simple 

implementation of keyed files • for your programs - running under 
Basic09. A real time saver and should be a pan of every serious 
programmers tool -box. 

A CCO obj. only . $89.95 

Lucldata PASCAL UTILITIES (Requires Pascal ver 3) 

XREF - produce a Cross Reference Listing of any teal; oriented to 
Pascal Source. 

INCLUDE - Include other Fflea in a Source Text, including Binaty - 
unlimited nesting. 

PROFILER - provides an Indented, Numbeied, "Structogram" of a 
Pascal Source Text File; view ihe overall structure of large 
programs, progiam integrity, etc. Supplied in Pascal Source Code; 
requires compilation. 

F,S.CCf--EACH 5" $4000. 8".$50jM 

DUB from S.B. Media - A UnlFI.EX BASIC decompiler Re-Cicate a 
Source Listing from UaiFLEX Compiled basic Programs. Works 
w/ ALL Versions of 6809 UniFLEX basic. 
U • $219.95 

LOW COST PROGRAM KITS from Southeast Media The following 
kits are available for FLEX, SK'DOS on eh her 5" or 8" Disk. 

1. BASICTOOL-CHEST $29.95 
BUSTER.CMD: pretty pi-inter 
UNEXREFBAS: line erossreferencer 
RRMPAC.BAS. SPCPACBAS, COMPAC.BAS: 
tezTOve superfluous code 

STRIP. B AS: superfluous line-numbers stripper 

2. FXEX, SK^DOS UHLlTIES Krr $39.99 
CATS. CMD: alphabetically- sorted directory listing 
CATD.CMEh date-sorted dircctoiy liting 
COPYSORT.CMD: file copy, alphabetically 
COPYDATE.CMD: file copy, by dale-order 
FILED A1E, CMD: change tile creation date 

LNFO.CMD (A LNF0GMX.CMD): tells disk aDtibutcs ^content* 

RFUNK.CMD (A RELINK82): re-orders fiagmented free 

chain 

RESQ.CMEh undekiej (removal) a deleted file 

SECTORS.CMEfc show sector order in free chain 

XLCMD: super text lister 



3. ASSEMBLERS/DISASSEMBLERS UTILITIES 

$39.95 
UNEFEED.CMD: 'modularise' disassembler output 
MAT11.CMD: decimal, hex. binaiy, octal conversions 
& tables 
SKIP.CMD: column » ripper 

4. WORD . PROCESSOR SUPPORT UTILITIES 

$49.95 
FULLSTOP.CMD: checks for capitalization 
BSTYQT.BAS (-BAC): Stylo to dot man i» printer 
NECPRINT.CMD: Stylo to dot-maiiix primer tiller code 

5. UTILITIES FOR INDEXING $49.95 
MENU.BAS: selects lequiied program from list below 
INDEX.BAC: word index 

PIIRASES.BAC: phrase index 
CONTENT.BAC: uble of foments 
INDXSORTBAC: fast alphabetic sort routine 
FORMATER BAG produces a 2-coUimn formatted index 
APPEND.BAC: append any number of files 
CHAR BEN: line reader 

BASIC 09 TOOLS consist of 21 subroutines for Basic09. 
6 were wiiuen in C language and the remainder in assembly. 
All ihe routines arc compiled down to native machine code which 
makes them fast and compact. 

L CFILL - fills a siting with characters 

2. DPEEK - Double peek 

3. DPOKE - Double poke 

4. FPOS ~ Current lile position 

5. FSIZE - File sixs 

6. FTRIM ~ removes leading spaces from a suing 

7. GETPR - returns the current process ID 

8. GETOPf - gets 32 byte option section 

9. GETUSR - gets the user ID 

10. GTIME - gets the time 

1 1. INSERT - insert a suing into another 

12. LOWER - converts a string into lowercase 

13. READY - Checks for available input 

14. SETPRIOR - changes a process priority 

15. SETUSR - changes the user ID 

16. SETOPr - set 32 byte eptioo packet 

17. STIME - sets the lime 

18. SPACE - adds specs to a string 

19. SWAP - swaps any two variable* 
2a SYSCALL - system call 

21. UPPER - converts a string to uppercase 

For OS-9 * $44.95 - Includes Source Code 

See Review in January 1987 issue of 68 Micro Journal 
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SOFTOOLS 

The following programs arc included in object form for immediate 
application. PU9 source code available for customization. 

READ»ME Complete instructions for initial set-up and operation. Can 

even be p timed out with the included text processor. 
CONFIG one lime system configuration. 

CHANGE changes wordi, characters, etc. globally la any text type file. 
CLEANTXT converts text files losiandird FLEX, SK*DOS files. 
COMMON compare two lext files and report* differences. 
COMPARE another check Hie ihat rcpoiu mis-matched line*. 
CONCAT similar lo FLEX, SK*DOS append but can also list files to 

screen, 
DOCUMENT for PL/9 source files. Very useful in examining parameter 

passing aspects of procedures. 
ECHO echo* to eilher semen or file. 
FIND an improve find command with "pattern" matching and wildcards. 

Very useful. 
HEX dump* files in both hex and ASCII. 
INCLUDE a file copy program thai will accept "includes of other disk 

files. 
KWIC allows rotating each woid, on each line la the beginning. Veiy 

useful in a son program, etc* 
LISTDIR a directory listing program. Not super, but befler than CAT. 
MEMSORT a high-speed text file toner. Up to 10 fields may be sorted. 

Very fait. Veiy useful 
MULTICOL width of page, number of columns may be specif tad, A 

MUST1 
PAGE similar to LIST but allows for a page header, page width and 

depth. Adjust for CRT screen or printer a* set up by CONFIG. A 

veiy smart pint dr.ver. Allows printer control commands, 
REMOVE a fast file deleter. Careful no prompts issued. Zap, and it* 

gonef 
SCREEN a screen listing utility. Ward wraps text to fii sotcn. Screen 

depth may be altered at run lime. 
SORT a super version of MEMSORT. AsccndingAJctcending order, up 

to 10 keys, case ovenrde, son on nth ward and son on characters if 

file is small enough, sons in RAM. If large file, sort is constrained 

to size of your largest disk capacity. 
TPROC a small but nice text formatter. This is a complete formatter and 

hai functions not found in other formatters. 
TRANSLIT sons a file by x keyf ietds. Checks for duplications. Up to 

lOkeyfdesmay be used. 
UNROTATE used with KWIC this program reads an inpu file and 

unfold* it a line at a time. If the file ha* been sorted each word will 

be presented in sequence, 
WC a word count utility. Can count words, characters or lines. 

NOTE: this art of untitles consists of 6 5-1/4" disks or 2 8 M disks* ml 
source <PL9). 3 5-1/4" disks or I 8* disk w/o source. 
Complete sel SPECIAL INTRO PRICE: 
SMA m w/souiee Ft£X - SK'DOS - $129.95 
w/q source - $79.95 
r w/source - S79.95 - w/o source S49.95 



FULLSCREEN FORMS DISPLAY from Computer Systems 

Consultants - TSC Extended BASIC piogram support* any Serial 
Terminal with Cursor Control or Memory-Mapped Video Displays; 
substantially extends the capabilities of the rVrgram Designer by 
providing a table-driven method of describing and using Full Screen 
Displays. 

F. S and CCF. U * 125D0. w/ Source - SSQOO 

SOLVE from S.E. Media - OS-9 Levels 1 and II only. A Symbolic 
Object/Logic Vctification & Examine debugger. Including inline 
debugging, disassemble and assemble. SOLVE IS THE MOST 
COMPLETE DEBUGGER we have seen for the 6809 OS-9 seriesl 
SOLVE does it all I Wiih a r.ch selection of monitor, assembler. 
disassembler, environmental, execution and other miscellaneous 
commands, SOLVE is ihe MOST POWERFUL toolkit item you 
can own! Yet, SOLVE is simple to usel With complete 
documentation, a snap! Everyone who has ordered this package has 
raved) Sec review - 68 Micro Journal - Oecember 1985. No "blind* 
debugging here, full screen displays, riich and complete in 
information presented. Since review in 68 Micro Journal, this is our 
fastest movcrf 

Levels I & II only - OS-9 $69.95 



DISK UTILITIES 

OS-9 VDisk from S.E Media - For Level I only. Use the Extended 
Memory capabiliry of your SWTPC or Cimix CPU caid (or similar 
format DAT) for FAST Program Compiles, CMD execution, high 
speed inter-process eommunicaiions (witlwot pipe buffers), etc • 
SAVE that System Memory. Virtual Disk size is variable in 4K 
incrcDments up to 960K. Some Assembly Requisvd. 
U vet I OS*9 obj.V9 .95; wi Source SJ49 95 

OF from S.E. Media - Written in BAS1C09 (with Source), includes: 
REFORMAT, a BASIC09 Program that reformats a chosen amount 
of an OS-9 disk to R-EX, SK*DOS Formal so it can be used 
normally by FLEX. SK'DOS; and FLEX, a BASIC09 Program thai 
does ihe actual mad or write function to the special O-F Transfer 
Disk; user-friendly menu driven. Read the FLEX. SK'DOS 
Directory. Delete FLEX, SK»DOS Files. Copy both diiections. etc. 
FLEX, SK'DOS users use the special disk just like any other FLEX. 
SK'OOS disk 

O . 6809*68000 $79.95 

LSORT from S.E. Media - A SORT/MERGE package for OS.9 (Level 1 
& U only). Sorts records with fixed lengihs or variable lengths. 
Allows for eilher ascending or descending son. Soiling can be done 
in eilher ASCII sequence or alternate collating sequence. Right, left 
or no justificaLiro of data fields available, I SORT include* a full 
sec of comments and errors messages. 
OS 9 S8500 



AvalUMBtY Uf«»* 
O.OS4I-SK*DOS 
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HIER from S.E. Media • HIER is a modem hierorchal storage system for 
users under FLEX. SK*DOS. It answers I he 09*d* of those who 
have hatd disk capabilities on Iheir system*, or many liles on one 
disk - any size. Using HIER a regular (any) FLEX, SK'DOS 
disk (8 • 5 - hard disk) am have sub directories. By (his method 
the problems of assigning unique names- io files is less burden some 
Different file* with the emi same name may be on the same disk, 
as long as they areindiiferentdireiaaWes. For the Winchester user 
ibis bcconci a must. Sub-diiacioTtej are the modem day solution 
that all current laige systems use. Each directory looks to FLEX, 
SK*0OS like a regular file, except they have the extension 
M>1KV A full sel of directory handling programs mre included, 
making the operation of HIER simple and il nig hi forward A 
special install package is included to install HIER to your particular 
version of FLEX. SK*DOS. S<*ne assembly required. Install 
indicates each byte or reference change needed. Typically - 6 byte 
change* in source (furnished) and one assembly of HIER is aU that 
is required, No programming required! 
FLEX - SK*DOS S79.95 

COPYMULT from S.E. Media - Copy LARGE Disks to leveial 

smaller disks. FLEX. SK*DOS ullitiei allow the backup of ANY 
size disk to any SMALLER ii»e diskettes (Hard Disk to floppies, 8" 
to 5", etc.) by simply inserting diskettes as requested by 
COPYMULT. No fooling with directory deletions, etc. 
COFYMULT.CMD unoaviunda normal "copy' syntax and keeps up 
with files copied by maintaining directories for both host and 
receiving disk system. Also includes BACKUP.CMD to download 
any site "random" type file; RESIORE.CMD to restructure copied 
"random" files for copying, or recopying back to the host system; 
and FREEUNK.CMD as a "bonus" utility that "relinks" the free 
chain of floppy or hard disk, eliminating fragmentation. 

Completely documented Assembly Language Source files included, 
ALL 4 Programs (FLEX. SK*DOS. 8" or 5V 199,50 

COPYCAT from Lucidata - Pascal NOT required. Allows reading 

TSC Mini-FLEX, SK*DOS. SSB OOS68. and Digital Research CP/ 
M Disks while operating wider SK*DOS , FIEXI.O. FLEX 2,O t or 
FLEX 9.0 with 6800 or 6809 Systems. COPYCAT will oot 
perform miracles, but, between the program and the manual, you 
stand a good dunce of accomplishing a transfer. Also includes 
some Utilities to help out. Programs supplied in Modular Source 
Code (Assembly Language) to help solve unusual problems. 
F.SandCCF5 m $50.00 F.S S m -$65.00 

VIRTUAL TERMINAL from S.E. Media - Allows one cerminal to do 
the work of several. The user may start as many as eight task on one 
terminal, under VIM UAL TERMINAL and switch back and forth 
between task at win. No need to exit each one; just jump back and 
forth. Complete with configurat on program. The best way to keep 
up with those background programs. 
O &. CCO - obj. only - $49,95 



FLEX, SK'DOS DISK UTILITIES from Computer Systems 

Consultants — Eight (8) different Assembly language (w/ Source 
Code) FLEX. SK>DOS Utilities for every FLEX. SK*DOS Users 
Toolbox: Copy a File with CRC Errors; Test Disk for errors; 
Compare two Disks; a fast Disk Backup Program; Edit Disk 
Sartors; Linearize Free -Chain on the Disk; print Disk Identification; 
and Soil and Replace the Disk Directory (in sorted order). - PLUS 
- Ten X BASIC Programs including: A BASIC Resequencer with 
EX IK As over "RENUM" tike check for missing label definitions. 
processes Disk to Disk instead of in Memoiy. etc Other programs 
Compare. Merge, or Generate Updates between two BASIC 
Programs, check BASIC Sequence Numbcis, compare two 
unsequenced liles, and 5 Program i for establishing a Master 
Directory of several Disks, and sorting, aelerung. updating, and 
printing paginsied listings of these files, A BASIC Cross-Refcrcnce 
Program, written in Assembly Language, which provides an X*Ref 
Listing of the Variables and Reserved Words in TSC BASIC. 
XBASIC. and PRECOMPH£R BASIC Programs. 

ALL Utilities include Source* (either BASIC or AL. Source Code). 
F.SandCCF .150.00 
BASIC Utilities ONLY for UniFLEX - $30J00 

COMMUNICATIONS 

CMODEM Telecoranunicalions Program from Computer Systems 
Consultants, Inc. - Menu -Driven: supports Dumb-Terminal Mode; 
Upload and Download in non-protocol mode, and the CP/M 
*Modem7" Qtristcnscn protocol mode to enable communicai on 
capabilities for almost any requirement Written in H C H . 

FLEX. SK'DOS. CCF. OS-9. UniFLEX, 68000 A 6899th 
Source S 100. 00 - without Source $50 M 

X-TALK from S.E. Media - X-TALK consists of two disks and a special 
cable, the Kodkvp enables a 6809 SWTPC computer to dump 
UniFLEX files directly to the UmFLEX MUSTANG-0201 1 his is 
the ONLY currently available method to transfer SWTPC 6809 
UniFLEX files to a 68000 UniFLEX system- Gimix 6809 users 
may dump a 6809 UniFLEX file to a 6809 UniFt£X five inch disk 
and it is readable by the MUSTANG -020. The cable i s specially 
prepared with internal connections to match the non-standard 
SWTPC SO/9 IAO Db25 connectors. A special SWTPC S+ cable sel 
is also available. Users should specify which SWTPC system he/ 
she wishes to communicate with the MUSTANG 020. The X- 
TALK software is furnished on iwodisks. One eight inch disk 
contains S.E. Media modem program C MODEM (6809) and the 
other disk is a MUSTANG 020 five inch disk with CMODEM 
(68020).. Teat and binary files may be directly transferred between 
ibe two systems. The OMODEM programs are unaltered and 
perform as excellent modem programs also. X-TALK can be 
purchased with or wit hoot the special cables, but this special price is 
available to registered MUSTANG-020 users only. 

XTALK Complete (cable. 2 disks) 199.95 

XTALK Software (2 disks only) 169,95 

X-TALK with CMODEM Source 1149.95 



a-o*-M***«bos 
r.n.JT,u.iwvxi 
CDt ■ CHar Caaaj i OtM 
qy.ok Cf ai rut 



*OS-f i» % Tt*4tamrk *f M k i t w n mtiA 




South "East Media 

$900 Cassandm Smith %£ - Ofurson, T*. 37343 




•* Shipping •* 

A 44 1% UJA. imln. IL») 
Fwrlcn Stirfm Add i% 
Forrlpi Almwll Add 1 0* 
Or CO JJl n m ppi n K Ofilf 



t*M— fr-ftfK ■»« tJafflE* t»Tr*d+irt*rt.«rf Tt<hr*,| SytUTTMCwuttHiMj^lCOO* In TradttirfcrfStor-lCSffft— rt & 7 *wm,Vi*^ 



34 



Auaust*87 



W Micro Journal 



Tekpftont: (615) 842-4600 SOUtfl XdSt ^Media 



Tck^: 5106006630 



OS-9, tlni'JVLX, 'JL'EX, S'JC'POS 



XDATA from S.E Media - A COMMUNLCA1TON Package for the 
UniFLEX Operating System. Use with CP/M. Main Frena, other 
UniFLEX Systems, etc Veiif ies Transmission using checksum or 
QIC; Re -Transmits bad blocks, etc. 
U . 1299.99 

EDITORS & WORD PROCESSING 



J VST from S.E. Media - Text Formatter developed by Ron Anderson: 
for Dot Matrix Printers, provides many unique features. Output 
"Formatted* Text to ihe Display. Use the FPRDsT.CMD supplied 
for producing multiple copes of the "Formatted" Text on the Printer 
INCLUDING IMBEDDED PRINTER COMMANDS (very useful 
it other lima also, and worth the price of the program by itself). 
"User Configurable" for adipting to other Primers (comes set up for 
Epson MX-80 with Giaflrax); up to ten (10) imbedded "Primer 
Control Commands". Compensates for a "Double Width" primed 
line. Includes the nonm] line width, margin, indent, paiagraph, 
space, vertical skip tinei. page length, page numbeimg. centering, 
fill, justification, etc. Use with PAT or any other editor. 

* Now supplied as a two disk set; 

Disk 01: JUST2.CMD object }Ue t 

JUS12JXTPL9 source FLEX, SK'DOS - CC 

Disk *2: JUSTSC object and source in C: 

FLEX, SK'DOS - OS9 - CC 

The J1SC and regular JUSTC source are two separate programs. J1SC 
compiles to a version that expect i TSC Word Processor type 
commands, Cpp -*p .ce etc.) Great for your older text files. 1 he C 
source compiles to a siandaid syntax JUST.CMD object file. Using 
JUST syntax (,p .u .y etc) Wiih all JUSr functions plus several 
additional pi bucr formatting functions. Reference the JUSTSC C 
source. For uVkc wanting an excellent BUDGET PRICED word 
processor, wiih features none of the others have. This is U! 

Disk (J) - PL9 FLEX only- F.S A CCF - $49.95 
Disk Set (2)~F.S& CCF a\ OS9 (C version) * $69.93 
OS 9 68K000 complete with Source . $79.95 

PAT from S.E. Media . A full feature screen otiented TEXT EDITOR 
wiih all ihe best of "PIE"™ *. For those who swore by and loved only 
PIE. this is for yonl All PIE features and much morel Too many 
features to list. And if you dont like ihese, change or add your own. 
PL*9 source furnished. *C* source available soon. Easily 
configured to your CRT. wiih special cotifig section. 
Regular FLEX, SK'DOS $129.50 
• SPECIAL INTRODUCTION OFFER • $79.95 
SPECIAL PAVJVST COMBO (wfsource) 

FLEX, SK'DOS $99.95 
OS 9 6SK Version $22900 
SPECIAL PATUUST COMBO 68 K S249.00 
Note: JUST in "C" source available for OS 9 



CEDRIC from S.E. Media - A screen oriented TEXT EDITOR with 
availability of 'MENU' aid. Macro definitions, configurable 
'permanent definable MACROS* - all standard features and the 
fastest 'global* functions in ihe wcsL A simple, automatic terminal 
config program makes ihis a real no hassef product. Only 6K in 
size, leaving the average lystem over 165 sectors for text buffer • 
appx. 14.000 plus of free memory! Extra fine for programming as 
well as tcxL 

FLEX, SK'DOS $69.95 

liAS-EDlT from S.E Media - A TSC BASIC or XBASIC screen editor, 
Appended to BASIC or XBASIC. BAS-EDIT is transparent to 
normal BASIC/X BASIC operation. Allows editing while in 
BASIC/XBASIC. Supports the following functions: OVERLAY. 
INSERT and DUP LINE. Make editing BASIC/XBASIC programs 
SIMPLE1 A GREAT time and effort saver. Programmers love it! 
NO more retyping entires lines, etc. Complete with over 25 
different CRT terminal configuration overlays, 
FLEX. CCF. SK'DOS $39.95 

SCR EDITOR III from Windnnh Micro Systems - Powerful Screen- 
Oriented Editor/Word Processor. Almost 50 different commands; 
over 300 pages of Documentation with Tutorial. Features Multi- 
Column display and editing, "decimal align" columns (AND add 
than up automatically), multiple keyiboke macros, even/odd page 
headers and footers, imbedded printer control codes, all 
justifications. "help" support, store common command iciies on 
disk, etc. Use supplied "set-ups", or remap the keyboaid to your 
needs. Except for proportional printing, ihis package will DO IT 
ALL! 

6900 or 6809 FLEX. SK'DOS or SSB DOS, OS 9 - $175/00 

SPELLB "Computer Dictionary" from S.E. Media - OVER 150,000 
words! Look up a word from within your Editor or Word Processor 
(with the SPII.CMD Utility which operates in the FLEX, SK'DOS 
UCS). Or check and update the Text after entry; ADD WORDS to 
Ihe Dictionary. "Flag" questionable words in the Text. "View a word 
in context" before changing or ignoring, dc. SPELLB first checks a 
"Common Word Dictionaiy", then the normal Dictionaiy, then a 
"Personal Word List", and finally, any ''Special Word List" you may 
have specified. SPELLB also allows the use of Small Disk Storage 
systems. 

F, Sand CCF -$129.95 

STYLO-GRAPH from Great Plains Computer Co. - A full-wjecn 

oriented WORD PROCESSOR - (uses the 51 x 24 Display Scraens 
onCoCoFL£X/SK«DOS.orPBJWordpak) Full screen diipl ay 
and editing; mppow the Daisy Wheel proportional printers. 
NEW PRICES 6309 CCF and CCO * $99.95, 
F.Sor O- $179.95, U . $299.95 
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OS-9, llni'JCLX, '} L'LX. SK'DOS 



STYLO-SPELL from Great Plains Computer Co. - Fist Computer 
Duaianary. Compftancrtfi Stylograph. 

SEW PRICES 6909 CCF and CCO . $69,95. 

F.S or 0.$99.9S,U $149.95 
STYLO-MERGE from Great Plains Computer Co. ~ Merge Mailing 
Lift to 'Form" Letter*. Print multiple Files, etc., through Stylo. 

NEW PRICES 6809 CCF and CCO - $59.95. 

F. S or 0- $79.95. U- $129.95 
STYLO-PAK — Graph ♦ SpeJJ ♦ Merge Package Deallll 

F,SorO. $329.95. U - S549.95 

0, 68000 $695.00 



MISCELLANEOUS 

TABULA RASA SPREADSHEET from Computer Systems 

Consultants - TABULA RASA is simitar to DESKTOP/PLAN; 
provides use of tabular computation schemes used for analysis of 
business, sales, and ecoiomic conditions. Menu-driven; extensive 
report-generation capabilities. Requite* TSCs Extended BASIC. 
F.Sand CCF t U . 150/00. wi Source - $100 DO 

DYNACALC ~ Bccnonic Spread Shed for the 6809 and 6800CX 
F.S.OS.9 and SPECIAL CCF- $200 JM. U» $395.00 
OS-9 68 K - $59500 

FULL SCREEN INVENTORY/MRP from Computer Systems 
Consultants - Use the Full Screen Inventory SyrcnVMaieiials 
Requirement Planning for maintaining inventories, Keeps item Held 
file in alphabetic*! otder for easier inquiry, l^ocate and/or piint 
records matching partial or complete item, description, vendor, or 
attributes; find back order or below stock levels. Print-outs in item 
or vendor order. MRP capability for the maintenance and analysis 
of Hierarchical assemblies of items in the invadwy fde. Requires 
15Cs Extended BASIC 

F. S and CCF. U $50 DO, wf Source - $100 DO 

FULL SCREEN MAILING LIST from Computer Systems Consultants 
- The Full Screen Mailing List System provides a means of 
maintaiAtng simpk mailing lists. Locale all records matching on 
partial or complete name, city, state, zip, or attiibmes for Listings or 
Labels, etc Requires ISCs Extended BASIC. 

F t Sand CCF. U-$50DO.wi Source - $100 DO 

DIET-TRAC forecaster (torn S.E. Media - An XBASIC program that 
plans a diet in terms of either calories and percentage of 
carbohydrates, proteins and fats (C P G%) or grams of 
Carbohydrate. Protein and Fat food exchanges of each of the six 
basic food groups (vegetable, bread, meat, skim milk, fruit and fat) 
for a effcaiftc individual. Sex. Age, Height, Preatait Weight. Frame 
Size, Activity level and Basal MdabUk Rale for normal individual 
are taken into account. Ideal weight and sustaining calories for any 
weight of the above individual are calculated. Provides number of 
days and daily calendar after weight goal and calorie plan is 
determined. 

F.S .$5925. U*$89J95 



CROSS ASSEMBLERS 

TRUE CROSS ASSEMBLERS from Computer Systems Consultants - 
Suppons 1B02/S. £-80. 6800/1/2/3/8/1 IMC II. 6804, 6805MC05/ 
146805, 6809700/01. 6502 family, 8080/5. 60M/1/2/3 5*35/39/ 40/ 
48/C48/49/C49/50/8748/49. 8031/51/8751, and 68000 Systems. 
Assembler and Listing formats same as target CPU's format. 
Produces midline independent Motorola S-Text 
68000 or 6609. Fl£X. SK*DOS. CCF. OS-9. UniFl£X 
any object or source each * $50 DO 
any 3 object or source each - $100 DO 
Set of ALL object $200 DO - wi source $500 DO 

XASM Cross Assembler* for FLEX. SK'DOS from S.E. MEDIA - 
This set of 6800/1/2/3/5/8, 6301. 6502. 8080/5. and Z80 Cross 
Assemblers uses the familiar TSC Macro Assembler Command Line 
and Source Code format. Assembler options, etc., in providing code 
for the target CPUs. 

Complete set. Fl£X, SK'DOS only . 5I50DO 
CRASMB from LLOYD I/O -- Suppons Motorola's. Intel's, Zilog's. and 
other's CPU syntax for these 8-Bit microprocessors: 6800, 6801, 
6303, 6804, 6805, 6809,6811 (all varieties); 6502. 1802/5, 8048 
family. 8051 family, 808<VH5. Z8. Z80. and TMS 7000 family. 
Has MACROS, Local labels. Label X REF. Label lengih to 30 
Oiars. Object code formats: Motorola S-Records (text), Intel HEX- 
Records (text), OS9 (binary), and FLEX, SK*DOS (binary). 
Written in Assembler... eg. Very F«U 
CPU TYPE- PHce each: 

For: MOTOROLA INTEL OTHER COMPLETE SET 
F1.EX9 5150 $150 5150 $399 

SK*OOS $150 $150 $150 $399 

OS9/6809 $150 $150 $150 $399 

OS9/68K ™- $432 

CRASMB 16.32 from LLOYD I/O - Supports Motorola's 68000. and 
has same features as the 8 bit version. OS9/ y S8K Object code 
Format allows this cross assembler to be used in developing your 
ptograms for OS9/68K on your OS9/6809 computer. 
Fl£X, SK+DOS. CCF, OS-916909 $249.00 

GAMES 

RAPIER - 6809 Chess Ptogrmm from S.E. Media -- Requires FLEX, 
SK*DOS and Displays on Any Type Terminal. Features: Four 
levels of play. Swap side, Point scoring system. Two display 
boards. Change skill levcL Solve Chcdonatt pfobkms in 1-2-3-4 
moves. Make move and swap sides. Play white or black. This b 
one of the strongest CHESS programs running on any 
microcomputer, estimated USCF Rating 1600+ (better than most 
'club' players at higher levels} 
F.S and CCF. $79 J>S 
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All agreed? Wow) I 1 almost got deafened by the choius of Tea. Yes' from all you 
readers out there! We]], how about substituting 'no cat' for Tom*, 'one cat' for 'Dick** 
and 'legs' for 'maibles'? Now we have : 



1. No cat has 95 legs. 

2. One cat has 4 more legs than no cat. 

3. Therefore one cat has 99 legs. 



Now we're ready 



I think EVERYONE will agree that Statement 1 Is TRUE, as is Statement 2, Lei's 
Ignore the odd cat which has had an accident and only has 3 legs!! Therefore. State- 
ment 3 must also be TRUE. Agreed? Sony, but 1 didn't hear a chorus of 'Yes* this 
Umel What's the problem? I warned you that words can be treacherous, didn't I? I'd 
further venture to say that If 'cat* had been replaced by 'xzirdl' (a silicate lile-form 
found only on the outermost moon of the planet Jupiter), you'd have been more 
prepared to accept the "logic" of these statements. It's only because you know from 
experience that cats don't have 99 legs that you disagree. NOT because you detect a 
Haw In the "logic". Why then ts Statement 3 logically TRUE for Aunt Minnie and Uncle 
Fred, but not for cats?7? 

You may reasonably ask what all this has to do with designing digital control circuits. 
My main purpose is to demonstrate why we convert words to a mathematical form 
when we design control circuits. 9 times out of 10. a set of wittten or verbal Instruc- 
tions spelling out the way In which a machine has to behave can be deceptively 
"logical" (as well see later on in this series), sometimes to the point where It's actually 
IMPOSSIBI-E to design the specified machine or circuit! 

I'll let you ponder the cat problem until you've got a bit more "logic" under your belts, 
but in the meantime Just imagine • - if It had Just ONE more leg our poor pussy-cat 
would be a centipede!! 

OK, I think we're more or less ready now to begin exploration of a strange new world, 
wheie 1 + 1 Is sometimes equal to 2. at other times equal to 10* and on occasion even 
equal to 1. But never fear, your trusty guide, Bob. (that's me) has been this way many 
times before, and will surely help you over any rough patches we come across during 
our travels. 

I'll tjy to keep the subject-matter as light-hearted as possible, but don't be misled by 
my method - this is serious stulf. and I'd like you to make eveiy ellort to really grasp 
what I'm talking about. 

Our equipment is no more than a pad of squared paper (1/4 Inch squares will do 
admirably) and a sharpened pencil (maybe with an eraser at the other end). So .... if 
we're all set. let's be on our way. 



INTRODUCTION 



The aim of this series Is to provide you with an understanding of the mathematical 
basis of control-circuit design, to the extent that you should be able to commence with 
an Initial set of specilkatlons (written or verbal) setting out the Intended function of 
the required machine. Then you'll convert these specs to a mathematical form which 
you'll manipulate according to certain rules, and from the resulting expressions 
construct the circuit diagram of the machine, using either relays or transistor logic- 
circuits as the case may be. 

Initially, we'll restrict our attention to control-circuits using relays only, until we've 
become quite familiar with the various techniques, and then, and then only, shall we 
consider using transistor logic, it's MUCH easier to see whether a network of relay- 
contacts will conduct an electrical current than It Is to decide whether the equivalent 
"logic-circuit" network will output a high' or 'low* voltage for a given set of input condi- 
tions. 
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The beginning of 
mathematical 
designs of digital 
circuits - George 
Boole 



Mile M M coming 
up 



CONTROL CIR- 
CUITS 



RELAYS - ELEC- 
TRICAL SYM- 
BOLS AND 
CIRCUIT DIA- 
GRAMS 



By the way. In case youVe never thought about it before, they are called "logic" circuits 
because their design Is based on the use of mathematical logic. 

1 must emphasize that the methods to be taught are. by and large, tools only, and It Is 
entirely up to you how proficient you become In their use. It still requires skill and 
experience to become a good designed 

lTie stoiy of the mathematical method of designing digital control circuits really begins 
in 1847, when George Boole published his book ~Ihe Mathematical Analysts of Logic"'. 
Up to this time, the study of logic (word-logic, that is) tended to bog down In confusing 
masses of words, which, with their attendant emotional content, only served to conceal 
the underlying logic of what was being said. All of which, translated, means that you 
are less likely to have a logical hang-up over 'xzlrdls' than you are over 'cats' (with which 
you are quite familiar), and even less likely to get yourself confused with X or *Y\ No- 
one could possibly get emotionally Involved with simple letters of the alphabet! 

Several attempts had been made to develop a set of symbols for logical expression, 
together with the rules for manipulating these symbols, but his was the first really 
workable method. It became known as 8oolean algebra. However, it was not until 1938 
that C. E. Shannon observed that electrical- relay networks could also be expressed in 
Boolean algebra, and since that time Its study has proceeded at an accelerating pace, 
producing a variety of techniques for designing control circuits, as well as for the 
analysis of already existing circuits. 

Before we proceed further though, let's explain the word "digital". Consider a volume- 
control on a radio - it can be turned down so low that we can hardly hear It. or adjusted 
to any intermediate setting to give any desiied volume, right up to the maximum of 
which the receiver Is capable. Ihls Is an "analog" control, as It can be adjusted through 
a continuous, Infinitely-close range of adjustments. But if our volume-control could 
only be "clicked" up in ten equal steps, increasing the volume by 10% at each step. It 
would be "digital". ITierc would be no possibility of obtaining a sound-level of 15% for 
example, as this would be In between the 10% and the 20% "step". An ordinaiy room- 
light Is digital (either ON or OFF! but the accelerator-pedal In a car Is analog. 

So here we are at Mile Of 

Control circuits fall into two distinct classes - "combinational" and "sequential". A 
combinational circuit (which Is the type we'll be examining for the first few miles of our 
Journey) always produces the same effect for the same combination of controls. Our 
simple room-light is such an example, because whenever the switch is OFF the light is 
also OFF. and whenever the switch Is ON the light Is also ON - unless, of course. It has 
broken down. 

In the case of a sequential circuit, however, a control may produce different effects, 
depending on the past histoiy of the device. A good example of this is a reading-lamp 
with a PUSH-ON/PUSH-OFF button-switch. Here, whether the light Is ON or OFF does 
not directly depend on whether the push-button Is pressed or released. If the light is 
OFF right now. then pressing and releasing the button will turn it ON. But if the light Is 
presently ON. then EXACTLY the same action will turn it OFF. 

I mentioned earlier that we're going to learn a lot about relay control-circuits before we 
tackle transistors, so what better place to start than to take a look at the little monster 
right here? 




B_)|_k 
C_0_c 



(a) 



Diagram 1 



<b) 
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Diagram la shows the construction of a typical small relay, while Diagram lb gives the 
standard symbols for Its various parts. We have a "normally-closed" (NC) contact 
between A and a. through which current can flow when the relay coil is not energised, 
and a "normally-open" (NO) contact between B and b, through which no current can How 
because of the gap between the contacts. If the coil of the relay is energised (that Is. if 
current is caused to flow between C and c) a magnetic-field is created in the core of the 
coil, attracting towards itself the moveable contacts joined by the dotted line. This 
causes the NC-contact to open, and the NO-contact to close. 

To the newcomer to this Held of study it seems almost incredible that a network of such 
relays, connected together In a specific way. can control a machine thiough the most 
intricate processes, even doing its "thinking" for it. Some of the early computers were 
built up from such networks, and it's our purpose to Jlnd out how to do this to achieve 
any system of control that we desire. 



o> 



^ — a 



Zi 



^-H3 



Z* 



Diagram 2 



Truth- Table s 
sets the condi- 
tions 



I^et's take a look at Diagram 2 for a momenll We see two vertical lines, and stiung out 
between them like the rungs of a ladder are three horizontal lines with some new sym- 
bols* In order to read and understand this diagram, we must Imagine electrical current 
coming in down the left vertical rail, and trying to Jlnd a path across to the right-hand 
vertical rail. In row- 1 it is unable to reach the coil of relay- Y because the contact of 
push-button-X Is open. In row-2 the current is unable to flow through light-Zl because 
of the NO-contact y of relay Y, but in row-3 current can How through the NC-contact y' of 
relay Y. Note that the contacts bear the same designation as the relay to which they 
belong, but in lower-case, y being a NO-contact and y" being a NC-contact. The NC- 
contact would normally be Indicated by a short bar over the contact-name, but as this 
could very easily be confused with an underline In the line of text above, we will use the 
alternative form, and indicate It with a prime, thus y\ yl\ y2' and so on. 

The fact that light-Z2 Is ON tells us that relay-Y is NOT energised, or NOT operated, and 
so the name of the NC-contact. that is y\ is read as M not-y". One could argue that the 
fact that light-Zl is OFF also tells us that relay-Y is NOT energised, but this ain't neces- 
sarily so. The relay COULD be energised but the lamp Itself be a dud. so from now on 
well not regard the ABSENCE of a signal as giving us reliable information. 

We can readily see from our Utile circuit that If push-button X is depressed, current can 
now flow through the coil of relay-Y, as a result of which both of its contacts will operate, 
thus turning ON light Zl and turning OFF light Z2. Aha, 1 almost forgot to mention that 
controls operated by humans (called primaiy controls) are usually given the name X, or 
XI. X2. etc: devices such as relays, timers and so on (called secondaiy controls) are 
named Y; and the output devices being controlled, such as lights, heaters or motors are 
named Z. 

It's possible to draw up a table, known as a Truth-Table, setting out the conditions of 
tills circuit, as shown in Diagram 3 : 



Push-button 




Relay Y 




y 

1 



Zl 




Z2 

1 



11 10 1 

Diagram 3 

Here is our first encounter with the Is and 0s which are going to become our friends 
along our Journey. *0' ALWAYS implies a negative, or NOT condition, such as 'NOT 
energised'. 'NOT lit', or even a simple 'NO', while T ALWAYS implies the a/Rrmatlve. such 
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Now we're for 
more compli- 
cated circuit* 



as *IS energised'. 'IS lit*. l IS so' or Just plain YES". Thus row 1 of Diagram 3 summarises 
the situation If X Is 'NOT pressed' - Y will NOT be energised, y will NOT be conducting 
current while y' will be so conducting, Z 1 will be OFF and Z2 will be ON, Conversely for 
row 2. 



Now we're ready to look at a slightly more complicated circuit in Diagram 4. Here it's 
quite obvious that no current can How through any of the rows, so nothing Is going to 
happen until a primary control Is operated. If push-button XI (s operated, we can see 
that relay Yl will become energised, both of its contacts y 1 will close, and light Zl alone 
will come on. Light Z2 will stay OFF because there (s still an open y2 contact "in seiies 
with" the closed yl contact. 




Diagram 4 



(Note that this circuit uses relays which have 2 normally-open contacts each). If push- 
button X2 alone is operated, relay Y2 alone will be energised, the y2 contacts will close, 
and again only Light Zl will come on. The contacts y 1 and y2 In series with Light Zl are 
said to be "In parallel" with one another. 

From the foregoing we can veiy easily see that if XI and X2 are operated together then 
both relays Yl and Y2 will become energised and both lights Z 1 and Z2 will light. We 
would say that the control expressions for Lights Zl and Z2 an? : 



Zl « y 1 OR y2 OR both 

Z2 = yl ANDy2 

BASIC SYM- This little section will Involve veiy little that you don't know already, because whether 

BOLS OF you've been aware of it or not. you've learned most of them in the previous section. These 

BOOLEAN are not ALL of the symbols of Boolean algebra, but they are all we need to know at this 

ALGEBRA stage of our adventure, which, by the way. comes under the general heading of SWITCH- 

ING THEORY. This particular name needs no explanation from me, I'm sure. Anyway. 
let's take a look at the six symbols we're going to learn. 



y 
y 

l 
o 



I r _ * Transmits current if Relay Y energised 



Does so when Relay Y is NOT energised 

- IS, eg IS transmitting, IS operated, IS lit, etc 

- IS NOT, eg IS NOT energised, IS NOT operated, IS NOT lit 

- OR (ie, in parallel with) eg yl+y2 - yl OR y2 OR both 

- AND <ie, in series with) eg yl.y2 - yl AND y2 

This is usually shortened to yly2 •» yl AND y2 



And that's It! The first four symbols you've already met. and the last two are needed so 
we can describe a circuit in a completely mathematical foim. For example, to describe 
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the control network of Diagram 4. we would write : 

Zl - y +y2 Z2 - yly2 Yl - XI Y2 - X2 

Given these 4 expressions, and the Information that the Xs are pushbuttons, it should be 
a VERY simple matter for us to reconstruct the original circuit-diagram. Let's pause a 
while here to check whether this is In fact tiue by trying our hand at the following : 



TEST ONE 



1 . Draw the following circuit -diagrams, where Zs are lights - 



U) Zl - yly2y3 

(iii) Z3 - Xl+yl' 
(v) Y4 - yl+y2y3 



(ii) Yl - y2+y3' 

<iv) Y2 - (yl+y2)y3 

(vi) Z2 - (yl+y2M (y3'+ y 4) 



HINT: 



in (iv) we understand that a y 1 contact is tn parallel with a y2 contact, and this little 
block Is then in series with a y3 contact. Distinguish carefully between (tv) and (v). and 
watch out for those NOT sijpis. such as yl' etc. 

2. Write expressions for the following networks - 



Hf 2 - 1 



(i) 



^U^' 



H^-.^ 



o— 




(ii) 



(iii) 



Well, here we are at Mile 1 , and really, it feels so good resting here while you're all work- 
ing away at these problems that I think I'll Just relax a while before we travel on to Mile 2 
of our trip. Hope youVe enjoyed the scenery along the way so far. It won't always be 
open country like this ~ sometimes we'll have to hack a path through a little heavy 
undergrowth before we see daylight again. But keep in mind always that others have 
been this way before you. and to dale 1 haven't lost a single soul. Granted* some have 
ended up a little woise for wear, but all have somehow managed to survive. And so shall 
youU 

I almost forgot to mention that answers to all problems encountered on ourjoumey will 
always be supplied before taking off along the next Mile. 



"Mile 2 to be continued" 



FOE THOSE WH 
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The material in this article is copyrighted by Micronics Research Corp. <fc Computer Publishing, Inc. (CPI), 
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LOGIC OPERATIONS - AND, OR & NOT 

Editor's Note: Due to typographical necessity the "overscore" is represented here as an 
"underscore" "_ M . We apologize for any inconvenience this may cause. 

My friend Denis phoned me some time ago with a problem in one of his programs where he 
was experiencing difficulties in manipulating logic operators. XBASIC has three of them - AND, 
OR and NOT - which constitute a logically complete set, in that any logical statement can be 
expressed with them. In actual fact, though, because AND and OR are logically complementary, 
the set can be reduced to 2 operators, by using AND to represent OR, or, of course, QR to 
represent AND. Here the bar over AND or OR is read as 'NOT - thus NOT AND or NOT OR. 
Readers already versed in the mathematics of digital logic will recognise NOT- AND as NAND, and 
NOT-OR as NOR, and also be aware that one of these operators alone is capable of expressing any 
Boolean logic function. However, let's take things one step at a time, and for the moment get back 
to our basic AND, OR and NOT! For the benefit of readers new to the game, perhaps I should 
mention that Boolean algebra is named after one George Boole, who is credited with being the fiist 
person to develop a truly consistent technique for manipulating English-language sentences in a 
mathematical form. 

To begin with, I'll reproduce the essence of my friend's problem, and we'll just take it from 
there. Consider the following: 

10 INPUT "Do you need instructions (Y or N)",Q$ 
20 IF Q$ = "N" OR Q$ = 'V GOTO 50 
30 IF Q$ o "Y" OR Q$ o y GOTO 10 
40 EXEC. "LIST GAME.INF" 
50 rest of program .... 

His intention is quite clear, namely that a response of 'N' (upper or lower-case) should bypass 
the LISTing of instructions by branching to Line 50. This leaves only "Y" or M y" as an alternative 
acceptable response, so at Line SO the intent is that if the response is neither of these the program 
should loop back and repeat the request for input, otheiwise it should fall through and LIST the 
instructions at Line 40 and then cany on with the rest of the program at Line 50. 
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To his suiprise, he found that a negative iesponse worked OK, branching him to Line 50, as 
did an invalid entry, which correctly returned him to Line 10. But, and a big but it was, a 
response of "Y" or "y" also behaved as an invalid response and bounced him back to Line 10! 
There was just no way to get the Instructions to LIST. I recall having seen similar puzzling 
occurrences with other people, so perhaps some explanations are in order. 

OK then, let's begin by pointing out that 'AND' is mathematically equivalent to '*' (multiply) 
and 'OR* to V (add), although Boolean logic expressions usually use 7 for AND, or omit it 
altogether. This is also true of normal algebraic operations, where a*b*c (or a.b,c) is written as 
abc, or 2*x as 2x. A further point to keep in mind is that, just as in ordinary arithmetic, where 
'multiply' has priority over 'add', so too does 'AND* have priority over 'OR*. Thus 2 + 3 * 4 is 
not simply executed from left to right to form 5*4 and thence 20 - - the part 3*4 must be 
executed first, producing 2 4* 12 and thence 14 as the correct result. Another way of looking at this 
is to imagine a set of parens around the high-priority part, thus 2 + (3 * 4). Obviously, if we 
wished the '+' to be executed first we would write our expression as (2 + 3) * 4 t as parens have a 
priority even higher than that of '*'. 

So too with AND and OR. The expression A AND B OR C is expressed in Boolean algebra as 
AB + C, which is quite different from A(B + C). Let's consider AB + Ca little further, perhaps 
how to express its inverse, that is AB. + £ This is performed by 'complementing* (please, not 
'complimenting' as occurs all too often) everything under the NOT bar, including the implied AND 
between A and B! It might seem that the result should be i OR B AND C,orA+B.£ in 
mathematical form, but this is not so, as we would be overlooking the fact that AB form a 'tied' 
pair in the original expression (remember the imaginary parens around them, as in our example 2 + 
3 * 4), and must retain that relationship in the transformed expression. Thus (A OR E) AND £ or 
(A + II) £ is the correct answer. 

One small final step, and we are ready to go back and i^-examine the little program above. In 
spite of the fact that XBASIC (and several other BASICs too) have chosen the value '-1' to 
represent TRUE, Boolean algebra uses the value T. Everyone seems to have agreed on '0' to 
represent FALSE, however. Before going back to our initial problem, let's take one last look at the 
expression AB + C. Suppose A were TRUE, B were FALSE and C TRUE, would the complete 
expression evaluate as TRUE or FALSE? This now becomes very easy to decide by merely 
replacing the individual terms with their corresponding TRUTH values. So AB + C becomes 1.0 + 
1, reducing to + 1 (1*0 = 0) and finally 1 (0 + 1 = 1), or to perform the whole operation in one 
step we would say (1 * 0) + 1 = 1, giving a truth-value of TRUE. In similar vein if A were 
FALSE, B were TRUE and C FALSE, we would say (0 * 1) + - 0, thus producing a result of 
FALSE for the complete expression. How much easier can this thing get? 

One more important feature of Boolean algebra to remember, and that is that 1 + 1 = 1. I won't 
go into the reasons for that right here, as it is really outside the scope of this article. Maybe in some 
future series, who knows? 

Now to get back on line once more. First, let's use our new knowledge to check out Line 20 
of our little program. If we assume a response of 'N' then 'Q$="N'" would be TRUE and 
'Q$="n r " would have to be FALSE. Thus the complete logic expression becomes TRUE OR 
FALSE', that is 1 + 0, which evaluates to 1 (TRUE), and so the program would branch to Line 50. 
The converse, ie an entry of "n", produces 0+1 = 1, which would also cause a branch to Line 50, 

How about Line 30? Suppose an entry of "Y" occurred. Why does the program not fall 
through to line 40 and produce a LISTing of the instructions? Let's examine it and find out! An 
entry of "Y" makes 'Q$o"Y'" FALSE, and makes •QSo'y'" TRUE, thus the complete 
expression equates to 'FALSE OR TRUE', or + 1 = 1. As the whole logic expression is TRUE 
the instruction to GOTO 10 would be carried out. If r 'y" were entered we would have the logic 
equation 1+0=1, and if it were some other entry such as "X", we would have 1 + 1 = 1. Thus, 
any response (other than "N ,r or V in Line 20 which would bypass the problem line altogether) 
results in a truth-value of T and a return to Line 10. Problem now is, how should Line 30 have 
been written? 
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Let's take another look at the intent of Line 30, and I'd suggest that this would be a good 
policy to adopt wherever 'negatives' are involved, and I classify '<> r as a negative (as it involves 
the use of the word NOT). What was intended was that if Q$="Y" OR Q$="y" then Line 40 
should be executed, otherwise back to Line 10, ie back to line 10 if NOT(Q$="Y" OR Q$="y"). In 
mathematical tenns this means complementing the stuff inside the parens, to produce 'Q$o"Y" 
AND Q$o"y"' ('<> r being the complement of '=', and 'AND' the complement of r OR'). Line 30 
should therefore read : 

30 IF Q$ o "Y" AND Q$ o "y" GOTO 10 

Now an entry of "Y" will produce the Boolean algebra equivalent 0*1=0, and an entry of 
"y" the Boolean equivalent 1 * = 0. Each expression therefore evaluates to FALSE and would 
cause a fall-through to Line 40, the desired response. On the other hand, an unacceptable entry of 
say 'X' would produce 1*1 = 1, evaluating to TRUE and causing a branch back to Line 10. Note 
that I have here used the symbol '*' to represent 'AND' simply to make my meaning clearer- 
Summarising, the technique is to regard all ANDs as equivalent to '*' with an imaginary set of 
parens enclosing the terms on either side, and all ORs as equivalent to V. The truth-value of each 
term is then evaluated, from which the truth-value of an entire logic expression can be deduced. 
So: 

Condition-A AND Condition-B OR Condition-C AND Condition-D 

is first transformed to (A * B) + (C * D), or more correctly AB + CD. Now, by replacing A, 
B, C and D with any given set of truth-values composed of Ts or r 0's, the truth-value of the 
complete expression can be very quickly arrived at. For instance if both Condition-A and 
Condition-B were TRUE and the others FALSE, we would have 1*1 + 0*0, reducing to 1 + 0, or 
1. Thus the complete expression would evaluate as TRUE, and the program of which it forms part 
would behave accordingly. 

In similar vein, where A, B, C etc represent conditional-expressions of the form 'Q$="Y"\ 
'A%<=B%', r A$>B$' and so on, A AND B AND C OR D would be transformed into the 
equivalent Boolean expression ABC + D, or, for the purpose of calculating, as (A * B * C) + D. 
This expression is then evaluated by substituting '1' or '0' for A, B, C and D according to the 
truth-value of the individual conditional-expressions which they represent. Note that a single '0' 
appearing in a chain of ANDs causes the whole chain to evaluate to '0', so no time need be wasted 
on the remainder of the AND chain. Conversely, a single '1' in a chain of ORs causes the whole 
chain to evaluate to 1 . 

Thus if 'A r were equivalent to '0' in our example expression we would immediately equate 
'ABC to '0 1 and move on to 'D r , as '0 * anything' evaluates to '0'. Or, if the expression were 
reversed to D + ABC, and 'D* were equivalent to T, we wouldn't waste our time evaluating 
'ABC, as '1 + anything* evaluates to T. Simple, isn't it? 

Just be careful when complementing logic expressions, as I did earlier, to remember that the 
complement of '>' is '<=' and not simply '<'. That is, if 'A' is NOT GREATER THAN it is 
LESS THAN OR EQUAL TO B\ The complement of '<>' is ? =\ And don't forget those 
'implied ANDs' when complementing from the algebraic form - they should be complemented to 
'OR's and the implied parentheses around a chain of them retained. 

I hope this little discussion has helped make it easier to figure out which way your program is 
going to respond to logic expressions, without having to try out all combinations in actual test 
RUNs of your program. 

ANOTHER WAY TO SHORTEN & SPEED UP YOUR PROGRAMS 

Some considerable time ago I suggested converting FP variables to Integers, SPLITting off 
instructions and also COMPILing programs as a means of opening up more memory for program 
space, in addition to speeding up program execution. Here is another technique for use in 
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programs which have a lot of DATA lines which the program at some stage READs and assigns to 
variables and/or arrays. When this situation occurs we would end up with two copies of all this 
stuff residing in memory at one and the same time. One set in the original DATA portion of the 
program itself, and another in the Stack-Registers which keep track of their ongoing values. Quite 
apait from the fact that, when popping in and out of subroutines or executing a GOTO, the program 
wastes time scanning through all these lines in order to locate its destination-line. 

In such cases, just as we did with Game-Instructions, we would set about SPLlTting off these 
DATA lines, removing the line-numbers and the actual word DATA, and ienaming the resultant file 
to f, GAME.DAT". 

Now, somewhere near the beginning of our program we would add a line to the effect : 

50 OPEN OLD "GAME" AS 1 

Of course, if Channel 1 is already pre-empted for some other file, we would use the next 
available Channel-Number instead. Note that the extension '.DAT is not necessary as this is 
XBASICs default extension when opening up a Channel. 

Now we would scan our program for all READ statements referencing DATA in our file, and 
replace the word 'READ' with 'INPUT #1," - thus: 

1000 INPUT #1, A%(1),A%(2),A%(3),X$ 

But be careful to SPLIT off only those DATA items which aie actually copied into an array, or 
assigned as initial values to selected variables, and be warned that you cannot RESTORE to a 
specific DATA item in the file. Though you can RESTORE to the beginning of the file by 
CLOSing Channel 1 and then re-OPENing it. Also don't forget to CLOSE the file once you've 
read in all the available DATA items, so : 

2000 CLOSE 1 

Where a scratch variable is used repeatedly, such as : 

100 READ M$: PRINT M$: PRINT: READ M$: PRINT M$ 

it would not be feasible to SPLIT off the corresponding DATA messages, as they are brought 
into memory just one at a time for assignment to M$, so these occurrences should be left 
untouched. The example Line 100 would, of course, read into M$ the DATA item currently 
pointed to by the internal DATA-pointer, PRINT it, then read the next DATA item into M$ before 
PRINTing it too. For a fuller explanation of how to use these DATA files to your best advantage 
you can do no better than to read the appropriate section in the XB ASIC article. 
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A PL/9 interface for 



by Ma/tln C. Gregorlc 
10 Salkre Mead 
Ha/ijw,Gasex U.K. 



ISAM 



As soon as Joe Condons ISAM package 
appeared in the Micro Journal I had to get a copy. A 
club mailing list I look alter needed a rewrite and I 
wanted to use some form of keyed access instead of 
the serial file dumps of an In-memoiy table I'd been 
using. Well the package duly arrived and was 
Installed and checked out. No problems showed up 
except that It is really desljpied for use with BASIC, 
which I never use unless forced to. In any case the 
mailing list was written in PL/9 and I wanted to reuse 
as much of It as possible. Only one answer - write an 
interlace for PL/9 - the library presented here. 

The library Is designed to provide a set of 
cnalnframe database-like lile handling verbs'. I have 
given it the flavour of a CODASYL database such as 
IDMSX because that Is what I use on mainframes. 
The aim was to provide a set of record* level 
procedures whose names would not clash with file 
handling procedure names within my normal 
libraries, hence READY/FINISH in place of 
OPEN/CLOSE. I also wanted to create a set of 
procedures that would require only the minimum 
number of parameters for each, and would allow 
several ISAM files to be open at once. This requited 
the Introduction of an ISAM Control Block' to ictaln 
the values of other parameters as well as the current 
error code for the file. The ICB contains a structure 
equivalent to the BASIC stilng array except that the 
record buffer is not Included in the ICB. though its 
length and a pointer to it is. I could have produced a 
much simpler interface consisting of Just one 
procedure but. although it would have been much 
smaller, it would have also been harder to use. 

Following sections of this article contain full 
documentation for ISAM. LIB. the Interface library, 
the libraiy code itself, an exact PL/9 equivalent of 
Joe Condons original demo program (LABEL.PL9), 
and an interface test program written in assembler 
(ISAMSIM.lxn. ISAMSIM is called just like ISAM. 
but all it does is to display the calling parameters 
and return emor code 123. You may want to use It for 
initial program checkout. 

ISAM is used Jrom PL/9 just as noirnal. Install 
ISAM and then run programs that call it. You can 
also compile and test programs under the debugger 
with ISAM Installed but beware that this will corrupt 
the last 4 bytes of the program being tested due to 
the necessity of planting link addresses at 
[MEMEND)-4. This has not yet crashed nry system 
but does cause strange effects in the last statement 
of the test program. The actual call to ISAM is in the 
ASMPROC ISAM. This must be an ASMPROC as 
ISAM corrupts the Y-regtster which is also used by 
PL/9 as a global variables pointer. The actual call 
must preserve the Y- register - something which 
cannot be done within PL/9. But for this no GEN 
statements would be necessaiy. 



A Up for ISAM users. I have heard statements 
to the elfect that ISAM is slow - I dont find it any 
slower than I would expect a keyed Hie access 
system to be on a FLEX disk, but one sure way to 
DES1KOY its performance is to let an ISAM file get 
fragmented. The easy way to fragment the file is to 
create It on an old, fragmented disk. The solution is 
to create ISAM files on newly formatted disks, and 
always back up disks by using the sequence: 

a format a new disk 

b copy the old disk onto the new one 

c file the old disk as your backup 

d use the new disk as the working copy 

This procedure will have the advantage of 
speeding up access to all files on the disk by 
ensuring that all files are unfiagmented. 

IDMSX is a trademark of International 
Computers Limited 

PL/* ISA* Interface Definition 



Interaction 

Thla tea— nt describes the procedures in the 1SM.UB procedure 
library. TTt* library he* no dependencies on other proKamiure 
libraries. It contain* • act or procedures that provldo en 
interface to I&AH.OO with • flavour reaertbllhg that of anhSYl, 
databases. 

Data 



An ISAM Control Bloc* lies) Is n**d»0 for each 3SAM rile to b» 
accessed by the program and • record buf tmt to contain records 
road froa or written to the file. The record m»y consist of any 
combination of byt»a, aUtnga, integers and reals-. The 
following ,xample will be used in the following aaamploss 

procedure teat: 

byte lcbUO), /• the leb "/ 

name 130}, off ice (301, on leava* 
lrvtager age; 

TMs declare* a control clock and a record of 63 bytea length 
coDiiatiiig of i 



a it ring of Up to 29 characters 

ttne key field! 

* data string or up to 2* characters 

a tingle tyte riag 

an integer. 



using the interface. 

The ISAM package muat be loaded baforo the calling program la 
run. Alternatively the I&4M9JM program nay be loaded in it. 
place - this program diaplays ISAM call parameters as a 
debugging aid, allowing initial testing to be carried out 
without risk or damaging the disk by uelng I1AK.O©. 

The file is created by the call* 

format | . Itfe, i , t eft f i le . t is - . 1040. 43, 301 

to exeat. TtSTTILaMSA with 1000 record!, each *3 by tea long 
with a 30 byte key. 

Th* Tila can have data loaded by the leguancei 

re4dyi.ict>,i, M toatrllo,lsa M ,63,30); 
ir db.atatuol.lcbl then 
begin 

t* aet up the record •/ 

atoret.lcb, .aamel; 

if dbstatusf.icb) then /» error action •/ 



rinianc.lcb) j 
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Ah entire flit nay he read with the 

ready < .Icb, 1. test file, is**, O* 30); 
If ohststus(.lcb)-<> then 
begin 

obtain (.icb, .ftret..naae); 
while db*tatus<.lcb)-0 
begin 

/" display the record •/ 
obtain t . icb, . noxt, .nasw) / 



finish (.IcbH 
You My poaltlon to any point in the filet 



MX procedures return a reply value. 
Parameter* ftrei 

Par Meter Deacr lotion 



poaltlon (.icb, .first); 
posit ion <- icb, "Martin*) ; 
posit Ian (.icb, .last J: 



TOU My read any record in Che filet 



obtalnl.lcb. -first, <r 
Obtain <. lcb,«H»Uin*\ 



naae) ; 



obtain! .icto., .last* .nan 
obtaln(.lcto, .next. na» 
obtain C . leh. Current. . 
obtain 1, ieh, . previous. 



/• elart or file 

/• bafors record with specified key 

/• end or rile 

/• poaltlon auy return 201 ir any 

/* other value la supplied rot the 

/* ■ m i d parameter, e.g. .next 



/* thla raturna -100 If the record 
/• round doea not *atch the key 
/• but haa a higher Key instead, 
/• It la still retrieved though 
/• If the reply la X) it la an 
/■ ISAM error 

/* reads next record in file 
/' rereada the Current record 
/• reada previous record in file 



■JEorda can be added: 

store ( . Icb, ♦ 



•»; 



The laet record accessed In the rile eay be extdlfledt 

aodlfyf .lefe, .sum); 

Or it nay be deleted: 

erase*. icb); 

ModUy la in ract a convenience function that cella atoire after 

erase. 

nsae mhir that the reply coda ahould be checAod after every ISAM 

operation. There are two possible eetnoda possible ■■ sii ISAM 

procedural return reply values, they are* 

t obtain (. Job, .next, .naxssrj 

if db*tatua(,lcbl then 
/■ error action •/ 

t ir obt*ln(.lcb, .next* *neae)>0 then 

/• error action •/ 

Dbstatua *«y be called psvtral t lasts - the reply value is kept 

til the next ISAM action is called, ir errora do occur there 

are two procedures to help fix the pnBhles)i they could be used 
ss roUowst 



U dbstatua{.lcb)>0 then 




begin 




rinisM.lcbj; 


/• sttenpt to close the rile 


If doit atua(. icb) then 


/• rix railed •/ 


begin 




short (.lcbl; 


/" fcroe file closed •/ 


reorgxnl*ej.icb|; 


/* rorcesbly r lx the file •/ 



■mires mp onto ISAM verbs am. follows* 
procedure (SAM verb cossnente 



ready 


OPEJf 




opens an ISAM rile 


finish 


coon 




closes an ISAM file 


abort 


IRITIALISS 


forced ISAM file close 


position 






sets file position without 
reading any records 




FIKST 




{.cod-. first) 




LAST 




(.cwa-.isst) 




START 




|.es5d-..kay vslue) 


obtain 






reads the nominated record 




FIRST ♦ 


ICXT 


(when .cod-, first r 




(AST t TfWlOW 


(when .csxfr-.lsst) 




START *■ 


NEXT 


[.ess**, hey value 1 




SEXT 




{.ess*-, next 




CVHREJti 




t.oad-. current) 




PSXVIOUS 




(.owd-. previous! 


store 


ADO 




stores tha record in the file 


erase 


0CU7I 




era see the current record 


oooiry 


Cfcirrc ♦ ADO 


replaces the current retard 


reorgsnls* EftTOrJuoss 


file rsxmoiy sfter ASxsrr 


format 


OtSATS 




new ISAM file setup 


dbstatua 


~ 




returns the current reply 
vslue for the file 



.icb 
Id 

fcLeh 



. rec 
ra>t 
rlen 



file operation for position snd obtain t 
one oft 

.first , lsst .nest .current .previous 
or 

.key where the byte erea 'say' holds the record 
k«y to be round 
ISAM file control blocs reference 
ISAM fUs rasaber 

toy length (first xlen chars In the file) 
string containing the file neswj 
(standard file apse, e.g. ■rrriLS.lftA) 
reference to the rlrst field In the record buffer 
russtasr of records in the file 
record length 




the record returned by obtain eossnt natch 
tha given key 

attospt to use POSITION in such « *ey thst s 
record would be reed* I.e. not for ISAM verba 
FIRST, LASTr or START, 



The procedures eret 



abort (integer .icb); 

Forcsblo close the file <Juy leave corrupt 
flag satl 

dbetatue (integer .lcbli 

Return last reply code rroai a file 

erasednteger .Icb); 

Delete the current record 

finish (Integer .lcbl; 
Close the file 

format (integer .icb. idi byta .nejset 
Integer rent, rlen* kl en) j 
Create a new file aa Id (naaed .naxw> contslning 
rent records esch rlen bytes long, **yed on the 
first xlen bytes» 

eodify (integer .icbt byte .rec)/ 

Oianow the contents or the currant record, sowing 
it in the rils ss necessary 

obtain (Integer .icbt byte ced, .rec>t 

Rett leva a record fron tha file. The record is 
selected by the velue of ced. 

position {inrxger .Icbt byte .ced>t 

Position tha record pointer within the file. The 
position is set by the value of end 

ready (integer .icb, ldc byte .naxwi Integer rlen. xlen); 
open tha file naassd in ,naae as ISAM idehtler Id. 
The record length is supplied in rlsn and tha key 
length in klett. 

reorganise ( integer .icb]; 
Reorganise the file. 

etoretlncager .icbt byte .rac)j 

Store s new record in the file. 

Pi/1 ISAM interface control bloc* definition. 



The (SAM Control fclocx la dwdered mm m SO byte area; 

oyta lcb<5©>; 

It exjst remain in •cupe throughout the portion of program using 
the file/ this swans that it should be declarea as Global data 
or In the outermost prccedUrs to use ISAM file handling. 

The block la regarded Internally aa an array of 2b Integers: 

location Contents 



♦0 
•1 



♦4 
♦ S 



♦T 






Pointer to +1) (ISAM rile ms«beC| 

2 



Pointer to ISAM <xss 
cosssand length [?► 



string 



Pointer to *1« USAM file haaw) 
l^swjth of file t*mm <up to 14 



Pointer to *24 (I 

2 



sirei 



Pointer to «2> (ISAM file site In records) 

To be Continued Next Month 
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kB/WINDRUSH 



Micro Systems Ltd. 



Wo<«ood Ubo#6io*ies i«e© Otiice) 

North Wftlthftm, Nofloik NR28 9SA 

Tel 10692)404086 

file* 975548 WMK*0 G 

MAPCONwvywioonsutmflts 



DUAL PROCESSOR HDS RUNS FOUR OPERATING SYSTEMS 



Vlndruih Plcro Sy*\«e.» Halted ire platted 10 IMWu>«f the iasfdlttt 
aviUabHIty Of tneir Hodel 8000/009, 8009/010 «nd 0000/020 H&S »yiten» *h1ch 
can l(H iff« e« OIN terprt hardware. 

Ihm *M »y»ttt 1* bated on a tttrvdird 6<J» 19" rack feOwntlnO: »y*te« fined into ft 
dtiktop encloivrt. In tMa cervf tfffrat fan *»n»tr1tt«d acitta to fttl <yitt* 
to dot • I la v1« the rtftr ot tha teie. The cotlpuctr trite* It alio ewetleblt In a 
TO" rack Mounting, vinton »^K full eccatl fro* the front for OEM application!. 

the uttr c«n ch«o«« between 6009, 64000, 60010 and 60020 procettor cards and 
between the FLEX, 0S*WL*vtl t, 0J-9/Ct*et 11. end the Crt-9/66* *l»rateti1ooJl ' 
operating tystea*. In til iritm tha rtc*, dlvfc ttoreee and t/0 herowera art 
identical. Thl ■ iMblit tht HP* Ufttr to configure tK« trstee. by H«ply Chtrtgtng 
procetior cards. Tr,« 6609 processor card aupeOrtt the fltx, OS-9/Leval J and 
0»-9/tas»el 11 operating tytte**. T*t 66000, MOID and M02O processor cprdt 
• upport tht 0S-W66K operating ante*. Tre 66QM proctttor card Include* the 
NCoOOSt floatingpoint co-proce»*or whict) I* Wily supported Py 0S-9/64K. 



Syltae ftaturea Include a choUt of ProCttsort, lOQl folly fttfttc ftno 
waH-«tatc static RAM, battery backed cLoct caltndar, lour ts 2S2C aerial porn, 
two ctntronlcs Parallel Pdntar porta, i ?) It> (unformatted) v1<w*e*tar and • 
choUt of 5.W or 3.5" 1 1 fto < unformatted! floppy disk drive. The Modular nature 
of the ay ■ tee enable] It to be cuatoelied to Individual requirement* at very low 
COit. 

Typical spate* coat* are ei follows: 

ftodtL 6000/009/r MeO* brocettor, 64k e>e«ory, rU* 0/S £2895,00 

Ptodol 6000/009/02 66«09 processor, 1 *b •e*ar y , OS- Wit vt I It 0/S 1*2*0.00 

Model 6000/010 12,5 "hi 60010 proctuor, 2 J* Kb »e*cry, 0S-W64X Oi95.00 

nodet SOOO/010/x 1?-5 <W»* 68010 Proetttor, 12S0 Kb nteory, 0S-9J6SK i 1064. 00 

Hodol 0000/020 1A.6T nh* 66020/68M1, 51? Kb t^ty, 0S-9/A6K £4095.00 

Hodol 6000/020/* 16.6? Hhf 66020/66661 . 1H6 Pb l*e«ory, CS-9/oOk <4od7.00 
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5ia/92*-6«04 

BXAQgB COOT ACT: 
mboty Marketing 

512/929-6700 
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n.Q. Green 

P.O. SOX $2073 
RMMOlX, A2 45072 



H.0. Gr 



mrmnotjk DrntODdcss axi static kapdok access rewoby, 

THI MCM6269 



Auetin, Texae. Key iir 1987... Kotorole*a MOS Keaory produota 
pivialon intruftucew a n«tf 4K x 4 static RAM, the XOU269. 
Fabricated ualo? Motorola* a ee*»*nd -generation high-par foraanoa 
ailicon-*ate OtOS (8OS05 III} technology, tbie fully atetlc 
deeign aliainatee tha need for external cloefce or tiling 
etretbee, while CMX>S circuitry reducee power coneuaption and 
providee battar reliability. With a faat acceee tlae or 35n«. 
tbla device ie auitebla for cache and othar eub-50rta 
applications. 

Sleiler In design to tha Motorola KCH6268, tha HOts269 is a 

feat chip aalact veraion raaturing accaaa to data in 15na 

Kaxiaua. 

Tha MCM6269 la organized 4K x 4 and oparates undar a ainqla 5V 

auppiy. Tha davica haa law Active AC power operation of 90aA 

xaxiaua and 40aA Maxim* undar DC condition*. 

Tha 35na MCM6269 conforaa to the JEDEC etandard pinout. It ie 

available in a 20 lead pleetic dual-In-line package and la 

priced at 55.79 in 100 placa guantitiaa. Order thla device by 
•pacifying MCK6269P3S. 

For aora information contact your local Motorola salea Office 
or authorized Motorola Dletributor. 



/S2 Electronic Specialists, Inc. 

171 South Main Street. Nark*. Mas*. 01790 
{61 7> 655-1532 

ATTENDED C0HPUTER PROTtCTlOM 

Electronic Specialists announces expansion of thalr 
Unattended System Power Interrupter Line. Designed to 
protect Unattended computer end other systems froo violent 
power fluctuation* or outage:;, the Interrupters disconnect 
AC power when irregular Pties occur. 

Automatic and Haoual Reset node Is are now available. In 
addition, straight blade and Twist configure tlona for l>, 20 
and 30 Amp circuits era offered. 



Electronic Specialists* Inc. P.O. Box 389, 171 S. naio St, 
Si tick, R&ssachusett* 01760 Phone: 500-225-4876 



NEW PRODUCT ANNOUNCEMENT 
The PADC-DAC-S ,LAB~ 

URDA Jj pleased to announce the availability of the PAOC DAC 8 
mLAB 1 * an Analog to Digital and Digital to Analog Converter expansion board 
for the PnRflflfl|*rABTH,or for any device with twn ft hit parallel ports At a 
Notebook Computer™ expansion, the A/DO/ A convener comes with a 3 ring 
mounting to fit conveniently into tbe P68000 aLAB™ 

The uLAB™ series if centered around popular microprocetiori. eg. 
61000, 8086, etc, lod support chips vilb operating system software This 
combination facilitates programming the mlcroprncas^rtr in it* native 
(machinal language white providing easy access to the development system 
hardware so that Its item Is can be Interfaced to the reii oi tbe werld and 
tbe microprocessor system can be used to observe and control parts of ibe 
real world. 

As an example, ibe P68000 pLAB™ Is a 68000 microprocessor with 
keypad. LED display, 4 K bytes SRAM, 8 K bytes of EPR0M. cassette interface, 
software operating lyiiem. power supply, instruction manual and 
Programmer's Reference Manual completely packaged in a 2 inch 3 ring 
binder, i.e,, a Notebook Computer** With in educational and student price 
nf $197 50. the cost harrier to providing individualized instruction on a 
microprocessor development system is broken- 
Much of the world operates vilb continuous analog signals To 
simplify laboratory experiments and computer control, an optional accessory, 
tbe PADC-DAC-B j»LAB 1M . provides 8 channels of analog to digital conversion 
and 8 channel* of digital to analog conversion botb wiib 8 bits per channel 
The PAX D AC 8 »LAB™ . complete wilb power supply, instruction manual 
and notebook also sells for Si 97 50. 

The PAOC-DAC-8 pLAR™. provides a convenient interface between 
the microprocessor and real world signals for eioeriraentillon with the 
control dt a variety of electronic; electro- mechanical etc., devices and 
systems. The dock is free running to Rive the latest available sample thus 
facilitating multiple sampling frequencies across eight channel) without 
complicated liming schemes, Tbe maiimum sampling rate is a function of 
the number of channels in use with a maximum of 10 t* Herti 

The control word provides for selection <**: ( I ) input/output * 1 bit, (2) 
channel selection - 3 bits for h/l and 3 bits for D/A, and (31 a single bit for 
simultaneous D/A conversion, 

Tha double buffered D/A converters vea a single convert signal to 
make it possible to precisely ouiput signals for sampled data control 

The low cost $197 5d. makes it possible to use the PADC OCA 8 
pLA5 1m , with tne P68000 pLAB™. as an educational too) lor student 
projects and one of a kind testing and experimentation 

Tne PAX DAOft pLA*™ features include 

• 8 channels Analog/Digital Conversion - 8 bits 

• 8 channels Digital/ A natog Conversion - 8 bits 

• Conversion rate is 10 K Hertz Tor singfc channel operation 

Additional channels will derate according to user software 

• Yoltage input compliance ♦,- 12 volts 

• Vollage output compliance ♦.* 12 volts 

« All ouiput channels double buffered to allow simultaneous control 
outputs 

• P68000 aXAB™, interface 

• Parallel Input/Output Interface 

• Individually addressable channels 

PADC DAC *iLAn™. Component* 

• Printed Circuit Board 

• 3 Ring Notebook Binder 
e User Manual 

• 115 VAC 60 Hi Power Adapter 

The PA0CDAC 8 aLAB™ Lials for $295 00 with a discount price oi 
$ 197 50 for Educational Institutions, faculty and Students. To order, contact 

Quaiitronics. Inc. [-800-245-4192. in PA 412-745-2663 

for technjeeJ information, contact URDA, inc. 412 683-8732 



'68' Micro ifodrnal 



August 37 



49 




HFTWoAL COWT4CT. 

A/****al S aJ Ta / aJ 

flEaMKA COHTACT 



B#OTOf*f>A AM**«C*J A NCW VME DELTA SERIES ^ SYSTEM. MOOEl 

2316 TO CMAliXHQE DEC 1 * OMKTOP M THE OEM TECHWCAL 

COt»-UTER SYSTEMS MAAKET 



Ifi^ *X lse> t. 1BB7 U9*vtlftMKniDieuiarDiw>«vi*#nt)ttiM«)VM£D«a 
Sar*ajry**rn. a* *aOd»231S Tba IWWI Oft S*** I f l i » OS ttt^a k*toaje*j 0* 
Model 29 16 WW Ht year, adorsaee* 0*» wc#* prove; aaornar* til fee eeJreml cnrsxaaa* merVet 

The »*§ partawa at atrrcaa two mt *• speed <* a vax 11 7ea vd a oeeip, asTta**** m 

a price M i Mi^ i lo 9* hew 0€C MtefOVAX' 2000 Oas***? a*mi*w.~ wd Aran*** ScJveyae 
ktn«l ayeawrw plarrarcj rravueep It « deer* imv, wi oanftoxraDai mar* *e**»e and 

deeVwefy t Dst*w eftotee tor OEMs end oysaenw Wjwn it Wo is in* onfr iyap « ** cteea 
Ptst Mv«t Unto* raw*** * The Ursa ttaw*nr*j eresem « «w ceaYaftng eyaaem o<ctac»s/rorg 
rnotltdWcl t yOrflniiyton B*M+»omW & iBm d * fa *to*fl&G*a8m*m ****** 
•w. 2319 *• Qoinfl to arm a****?** fyeewn woor* • fun *or *»mny Motor** « ebMnwvo 
ba capfare a rne)o» Mart ol tfw aacTtacal eysawna market and Pw VME CM* Seraw. Model Zlie 
M Just **> product k> do M " 

OT«a«. UCSaWO »<• llrtiwu and UN* Rf — 3 «r« *J Strong aotfura* of *W 23»6 
lit* i > i n fw ■ eti-ek* VatEhu* crveaaei erath « oflt«B|» abas by *w OEat onwwwj ***r**t 
SP taxia a p n paaatatam v/afc up *> tour Mpiojb o* navnar y and up id lot] ta>rtea of avmaaaal 
EST* liTufto— cask, eat 23 1« oan oArw, ajy fe«pari «*> to a" uaaw or dmb. «w>a*a « ■ 
power s* i,— n tor aw. wort gw ctoaa of lacraacal can**** aisna na Tfee flfDvaaei 32^6* 
aaataweawsxe at a aw of tot* Am $2,000 par served madm 

MM •»*• •» VM€ Oat* Sense usee tw U49M B6TX20 n«V<WI and SYSTEM V 60* 
AWM 3 ocarw^ o ya aa m , raws** parajhavai and Ma stave*; « easey nx9iiav« by e*> 
Mow 2316, mo low area «wt i Wconwa pna And. as aar, *• wme Oo*» Sanaa a 
If 2316a 




fiH MTCHO JOURNAL 
CompuUr JPubliahing Ontcr 
WOO Caaaandm Smith H«d 
P O Box (MB 
Kuwa.TN 37363 

D«ar8ir. 



Codetsn 

Naval Raaaardl Labdi aU»ry 

Washington. D.C. 20575 



I canantly aa«it thia latiar to Dr, B.M. Paaa who write* the C oduom for your 
toumai, H wirir, ha bad UtUa fkmiliahty with lha Madnioah and. theroJbra, I 
thought I ahoold try tha Macintosh taction cfW Micro Journal, 

My quastf ana esatar around I ho aaa of tha Macintosh Plus as a snuill number 
erunAar doing adaniiflc csleulatlonj oa my dasktop tag. numenoJ aolutiona to 



low mmasuJonal ofdiitao dinbrvntiaJ aquations syntaxes), but I think i 
tham would apply bo C ir^ifjr on 68000 computars in general 



*,yor 



I have triad ualog Portrmn (Mkyoao/VAh»jftX but 1 bava faund thit itia rfunky 
and bufgy. ProgTam davaiopmant ia painful, opmparod to say PttVao oa the 
VAX. Also- In |«MfffJ, I am not fond o/Fortxms. [ haf« xacently begun to pfngrun 
in C tun jtg UgbLapwjrd C. a vary ak* cackaga) u^. although lm still a txrviw, I 
have found C to be oaora "nalurmT. e»wn (br many sdentific computing 
applaostiona. It's a great language with a lot of potential. But there are some 



On the Mac ell C P^Ugas apparently use the SANE {Standard Appla Numeric 
Ciwtnmawkt) fbr their Heating point operebona. Tbeeea are very aourmia (80 biL J 
thlakx but they are slost . Tnia ia a curea for adentific computing where Qonting 
aggaji opanflnna ar» lha name of the f*a**- afienasaft FartrauL on tha other hand. 
tor all rta ethee omlta, has it a own finetinp point rwutinea built in. Thia make* 
PorOtto prngmma with lots of floatingpoint operettao* run 2 to 6 (maybe more) 
timaa ftWter than their C cnonttrparts (depending on tha precision one ia ojrijujA 

Another, albeit mnmUmr, penbiem U that C lacks aoma of the ouvtie* of Pdrtran 
which us aciantiela have oome to ILhr ermj bounds check mg. overflow alerts* 
r"^-g vansbU dt tw e ru s on ad arrmra to subprogrmms, ate Work aronnda een be 
bund at time*, but Ihey detract from what u remiiliallr ■ nice inejrwjnmQg 
language end aariranment. 

My Qoeatiooa are theae. I hava heard it nimnrwi (on a local BBS) that there «ol* 
a Motorola set of floating point reuttnaa which are fast Do they or any others exist? 
Can C packages like rain* make use of them 4 If so, how hard ia it? Who would I 
contact? I recently saw a book utled C** stout an (ATAT) extension to C which 
appeared to support many of the things I hkm stout Fortran -thing* Hke> vector*, 
matrices, type cheesing and spparenuy lots more. Doe* anything like this axial for 
the Macintosh or it anything in tha work* for it? Are there C libraries of idenUfic 
routine* avuleJble for us small time programmer*'' It there a version of "lint" 
(typa checking) fbr micro's, tha MaHnatnsh, (n particular? 



Thanks for taking the time to read thii. J appreciate any answer* to any of thrw 
qucatjon* Many of the attenuate t know have Macin toshea and would be very 
interested in the anawart also. Soma may to able to afford the Merit when it 
be com e * available (which will aolv* much of the apeed problem), but many of ut 
mil hava our Mac Plus** for some time to come Even so, we feel that that httle 
t'JiOOO could do a lot of soaniiAr calculating for ue m the next few year*. If only wp 
could work around the above problem* 



UtilM Pecoraf 



Editor's Note; Louis, thanks for the letter. Your 

observations are essentially correct, as concerns the 

Macintosh SANE routines. 

1 think your best bet is to look into the Macintosh U, or 

one of the 68020/68881 upgrades. The Mac 11 should be 

available sometime this summer. It has the math crunching 

68881 and is driven by a 68020. On modified Macs to that 

configuration the speed up has been dramatic. 

My personal opinion is that any HLL will be slower than 

assembler (even with a 68020/68881 combo) so the use of 

C, or any other JILL is going to be degraded, in speed, lo 

some degree or another. Even Fortran. To that end, 

assembler is still "King". 

The "Lint" program is available from several C vendor for 

the Mac. Usually it is named something different (maybe 

for copyright reasons), you will have to check with 

vendors on that account. 

We use the Apple MPW set of fILLs. This includes a very 

good C (no Lint), straight Pascal and Object Pascal as well 

as all the other programming aids available lo the Apple 

developer. This total package is about $600.00. This price 

covers about everything available from Apple. If interested, 

contact the Apple Developers Group - A.P.DA. - 206 251- 

6548. 

Maybe some of our readers will have more info for you. 

Good Luck. 



DMW 



MARCH 6. WOIP6, COMPUTES CONSULTANT 

i e*e am* uoeiotwD oat 

oixuix c Aurraawi a a i «oa 



ComoMtet* Ou01l«hir>o Camei* 

en mi cio jouANfH. 

S?«Sfl C*«*«r<)r« S<Ritr> 
*0 Don a*9 
HuiDn. TW 37343 

Dr. 4. n* Paaa* a articl* "C U*ar Wo tee" in in* Jut* 67 !••«• ia 
var'v irvtireil tiiQ, but trver* l« an error on o*0» 19* He ««v« tfiet 
bfverv f>#ctlOnt rarmol «)m«v» bo riPr«»f»mJ «<*ctlv m% # dtciwal 
fraction. rr» % m *m not cvri>ft(. 1tt»*-w le a <*1<jo in the fMC* thot 

g. the or.lv factor C»r the but* of 0»nor> r r«pt-t*iMat|an, la a| M a 
factor of the boo* of \t\w dK]Ml tvttta. Oil QifMny Prectlorv* 
can bo r-eoroeoAtae •■acllv •• a tfeciea) fraction uiing tha mmmm 
nsMtOor of OlOlt* to the r»0M Of ttw ooiist. 



Unary 9. \ u 1/1 «r AaciMl *. 3. tinary 



tl »i 



Aaxri**) a>. £9. and 



Bwcaueo 9* a factor of t»e bpm* of tna tftctut Wtlea. %m not 
factor Of binary bam ^oot deciaal fraclion* ctrwnl b 

rooreeenteo macllv i« binary. 



I hivf a areSlaa with whlefi t two 



can halo ^i 



t 0v«-ce.a*e« a CoCo IN noaino to veo it aa a tenatnai on ay OWoko 
• iSnal Oloftain. r*iw>nj CBJ9. loval a\ Ho* 1 rind that the 

MPial wort on tl>o CoCo to «et at SaaB free. "»»•• V8B aertal oort 
Mt mmr*y a oai dt ogt not tM. Thar-a a^-o JSal ane IZm*. [ \**+ 9C4M 
-ith oy other- larvir.il antf Orinter. I want to ratlin that eoo*d. 
How can t Qat either. baaB on tha 66a> or anotner aoooo on t h» CoCo> 



•tar ion IT, Wolf* 



50 



August '87 



'68* Micro Journal 





school of i 

uKTYtisar of pnrntmciH 

PfTTS»OliaH. PEWOYtVANIA 15241 



MXTtXIflC AND MMU-ATJOK CT*ffEJ£#acv 

Gentlemen: 



The University of Pittsburgh Conference on Modeling ind 
Simulation ts pleased to announce that we wil be sponsoring iwo 
short courses: 

COURSE I - PROGRAMMING AND INTERFACING THF nftftnft 

COURSE 2 - PROGRAMMING AND I NTERFACING THE MOB* 
MOtOPRQCKSOR 

SCHEDULE OP ACTIVITIES < BOTH 
COURSES 

FIRST DAY 

1:30 Coffee and Donuts 

9:00 I. •dure fl: Overview, Belie 

Architecture. Number and lnformillon 
Representation, Simple Programming 
Instructions 

10:00 LABORATORY fl: Visual and Audio 
Reaponie with Die P68000 uLAB™ (or PI0I6 
MLAB*-) 

12:00 LUNCHEON BUFFET (No Charge) •• 
Optional continuing practice 

1:00 LECTURE a 2 Addressing, Instructions, 
and 61000 (or 1016) Programming in 
AuemNy Language and Native Machine Code 

1:00 LABORATORY *h RebifoTcrnent of Lecture 
H and f2 Concept! 

4:30 QUESTION AND ANSWER PERIOD 
(Optional) 

o:«0 UiNNER (Individual Jnn.ti.ve) 

7:00^00 SELP STUDY 

SECOND DAY 

1:30 Coffee and Donuts 

9:00 Uciure f3: Interfacing io the 61000 (or 
8086) microprocessor and support ch.pi 

10:00 LABORATORY f): unpen men ti involving 
the lurnmg on of light*, (tinning motors, and 
reading switch inputs 

12:00 LUNCHEON BUFFET (No Charge) » 
Optional continuing practice 

1 00 LECTURE §4 Data communication and 
tucrnat control of the microprocessor 
(Interrupts) 

200 LABORATORY a4 Serial Communication 
from one 6W)00 for 1016) to another 61000 for 
xn*6) using ihe RS232C interface. 

4 10 qUESTlON AND ANSWER PERIOD 
lOplional) 

6 00 DINNER (Individual Initiative) 

} \Wi* tai SM> STUDY 

THIRD DAY 

* V> Coffee and Ooouii 

9 00 Leciure f* Multiple procetiori, 
cnproceison end process control 

10 00 Demonstrations using support 
equipment for the P68000 hLAB™ (or P|016 
wLaB 1 *), Assemblers. Cloied Loop Conlrol. 
SigneJ Processing 



ANNOUNCING TWO SHORT 
COURSES 

COURSE ! . PROGRAMMING 

AND INTERFACING THE 68000 

MICROPROCESSOR 

AND 

COURSE 2 - PROGRAMMING 

AND INTERFACING THE 8086 

MICROPROCESSOR 

DESCRIPTION OF BOTH COURSES 

Learn how to program either the Motorola 
6*000 m the Intel 1016 microproceitor and 
interface it to the real world at 2 1/2 day 
continuing education eoursei at the University 
of Pittsburgh. Course schedules arc given 
below These short courses Mtt sponsored by 
ihe Modeling and Simulation Conference 

The topics covered in each ihort course 
include 68000 (or 8086) architecture, 
addressing, instruction set. programming, 
peripherals, support, c om m u o i c at i o n. 
interfacing, eiosed loop computer control, etc. 

Each short course includes 5 hours of lecture 
mi) 1 2 hourp of handa^flii lihditLoiv 

oflffirflff Each student will Individually 
perform ei penmen is and get pro| ramming 
practice with roi/t>er own individual P 61000 
Ht.AB^ (or PrtOKo mLA0*« ) microprocessor 
ilcvrlopment ♦yuero end hrs/her own 
individual PWWEB uLA8"» wiro.wrap 
expansion tit 

TtEST OF' ALL- «he P68000 uLAB~ (or 
P8086 uLAS*") microproceitor development 
tyttem and the PWWEB ut.AB™ (total list 
nnce S360> on which you leant is YOURS TO 
KFEP and lake home wnh yuuMt 

INTENDED AUDIENCE 

Each short course is suitable for faculty 
members in computer science, computer 
engineering and electrical engineering 
«trpaitmenrs. practicing engineera, scientists, 
technician*, high school t/udents. college 
itudantt and anyone else who would like to 
learn shout tha 69000 (or 1016) processor and 
.met facing it to the real world 

INSTRUCTOR 

The tnttructor for the short course is Dr. 
Merlin H Mickle, Professor of Bleclrieal 
Engineering. University of Pittsburgh Several 
graduate assistants will also be available to 
assist in the laboratory nii.oni 



REGISTRATION INFORMATION 

Date*: As Listed in the Table Below 

(Jo-No-Go Dale: As Listed in the Table 
Below 

PLACE: BENEfXJMENOINEERuNOHALL, 

University of Pittsburgh. Pittsburgh. PA 
i 5 261 

REGISTRATION FEE: S6«0 (includes 5360 
■n equipment you take home with you) 

DEPOSIT: $200 f Nonrefundable unless course 
•Ws nut jtoj 

The Registration Fee of $600 includes all 
notes, a P68000 (or P8086) u I A B «• 
microprocessor development system and a 
F'WWf.B uLAB" 1 wire wrap npension kit 
including cables, connector- chips and tools 
(total im prtce of S160). attendance ai all 
lectures, laboratory sessions, discussions and 
demonstrations and two luncheon huffete, 
SttKitirai.on will he limited to the capacity of 
our lecture hall. Therefore, your deposit of 
$200 is nonrefundable unless a No*Oo decision 
is made in which case your deposit wilt be 
rammed. We must receive your registration 
and your deposit for tha eownc by the Go/No* 
Oo daie listed below. Tha balance of WOO will 
be due on the Hrsl day of the course. Please 
bring i check or cash 

TO REGISTER FOR TNI SHORT COURSE. SEND 
YOUR NAME. MADUNO ADOftsVS AND A CHECK 
(MADE OUT TO UNIVERSITY OF 
PirrSBURGR) FOR A $200 DEPOSIT TO: 

Marl in ht. Mfckle or William O, VogL Modeling 
and Simulalion Conference* 341 Benaduns, 
Engineering Hill, University of Pittsburgh, 
Pittsburgh. PA 15261. Tel Noa. 412-624-9612 
or 412*62^9686 

SCHEDULE OF COURSE OFFERINGS 

CoVrVe" "NO." V ~ " PROG R A M Ms NC~ "AND 
INTERFACING THE 61000 

MICROPROCESSOR 



No. Datea 

LI September 

12, 19. 26. 1987 
(Saturdays) 



Qflfflfl-flp flajg 
August 21. IW 



1.2 January 

2K23, 1988 



January I, 1988 
1.3 May 2. 3. 4. 1988 April 15.1988 



COURSE NO. 1 - PROGRAMMING ANQ 
INTERFACING THE 8086 

MICROPROCESSOR 



No. Datea 

2J October 

22.23.24, 1987 



LMJBJgj D«i« 
October I. 1 98? 



2.2 February January 29. 1988 

13.20.27. 1988 
(Saturdays) 

2.1 May 2. 3. 4. 1988 April 15.1988 



12:00 Course Completed 
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I just vSLi-tod to add sonetMriG to tJ^e 31t-Bu.c!cet go 
that oth-or- oroero $* Sardio ST-2900 coap&crt cpu'e 
iTon't have as tuch trouble aa I eid ~ettinc on-line 
to BBS. 

I biz using Xcon9 t ader* *to s ttb3 version 10 for OS-9 
level 1* ?7otliXn£ fancy, cut since In acsenbly 
lansua.ce, very fart. It *-as -Tltten by one or our 
Canadian neic^borsv Crec J'orse. Just ^rrlte, SASE 
please, and I 1 11 rive you tfce fietailT and address. 

Thanlcs, %$(sP 

Rill Qiad^icJ: 
Route 2 BOz 102 
Sett Hope, ?a. 2C93G 

DOVE 

OOMWV OOHKWnfJN 



CONTACT: 6. Kyle Tynar ^^00 622-7627 



Gove Computer Corporation, manufacturer of productivity enhancement 
products for die Macintosh and industry leader in 1 megabit CMOS SIMM 
technology, has announced a special rebate program for dealers and 
distributors. 

OOVE's Memoiy Products Division will offer trade-in credit lo dealers and 
distributors lor the 256K SIMMs which are replaced and returned to DOVE 
in conjunction with sales of their MacSnap™ 1 megabit SIMM products. 
Credits will be allowed on a 1:1 basis versus MacSnap purchases 
According to Rick Greene. Vice President of Sales and Marketing, this 
program is intended to be managed by the dealers and distributors to their 
desired advantage. "It affords our dealers and distributors the opportunity 
to offer an additional discount to the end purchaser and to increase their 
sates margin." Greene said. "And it eliminates the waste of 256K SIMMs 
which were not being utilised altera Macintosh Plus. SE or Macintosh II 
had been upgraded wrth our 1 Megabit CMOS SIMM products." 

"We are always looking for ways to improve productivity and to make the 
most of resources available to us. We're excited about this program 
because it will benefit eveiyone-aur dealers and distnbutors. the end 
us«s and DOVE COMPUTER- 
DOVE COMPUTER CORPORATION, located in Wilmington. North Carolina, 
designs, manufactures and markets memoiy, communications and software 
products for the Apple Macintosh line of computers The Company's 
products are used ptimarOy in business applications and are sold through 
dealers. 



: Immsdiataly 



COM? ACT: Larry Rosenthal 

(415) 359-8200 



siilia iterate* unncMCBO iioa raimiiMmc* 
tio29/tiiu c cbou oevhjovwewt eiSTix. 

OAKLAND, CA — Sierra Systems today announced the release of 
Sierra C, a C language Coapilar and croaa development package 
for tha Motorola 68020/68B81 embedded ayetems market. 

"Siarra C provaa that highly optimised coda can b« produced 
without alowing down tha development cycle." aald Siarra 
Syatama owner tarry Jftoaenthal. "Coaplle, aavmnblo, link and 
download la typically 30 tlaee faatar than on cuwp*r*ble croaa 
development packagee. On tha other hand, tha coda produced 
rune faatar and la bo re coapact than the code produced by 
current leaders in tha optlaltad croaa compiler market. H 

Sierra C lncludea a coapller, aaaamblar, linker, downloadera r 
coaplete C run-time library, file ay a tea, floating point 
emulation, librarian, coaaand driver, and object code 
utilities. Hosts currently Include the IBM PC/AT under rs-dos 
and the DEC VAX under VH3 end WIX. The uaer interface le 
identical accroee ell hoata. 

The package hea bean deelgned epaclflcally for embedded 
ay a terns applications, providing feature* like ROKeble, 
position Independent and re-entrant code, run-time 
initialization of eta tic data, and aupport for resident 
librerlee and highly fragmented addreee apace*. 

Tha PC/AT hoeted version of Sierra C runs at apaeda coaparabla 
to VAX workstations. The AT verelon is provided with an 
Interface cable (patent padding) which pamita Parallel 
downloads to the target ayatem at apaeda far greater than 
traditional earial mot node. With the parallel down loader, a 
100,000 byta executable object cen be downloaded in two 
seconder A eerial download of the same program ueing S- 
recorda at 9600 baud would take over five ■lnutea. 

The coapilar ie full ". 4 f and aupport e proposed XH.ll 
extenaiona auch aa structure peaalng and the "void" M enue", 
•const 1 * end "volatile* types. Coapilar optimisations include 
loop invariant raeoval, atrangth reductlona, common 
subexpression removal, folding of bath lntager and floating 
point types, global rag Later allocation by coloring, dead coda 
removal, branch alting, and optional fraas removal. 

♦Sierra C runa at interactive epeada, letting prograaaara sake 
and teat many sore modlf lcatlona per day than with other 
ayatem* ," aald Roaenthal. "Thla greatly increases programmer 
productivity and ehortene overall dsvelopaent ties." 

Pricss for Slsrra C era S2C00 for ths PC/AT and $4000 to 
$10000 for VAX baaed syatsme. Scheduled dlacounte ere 
available for multiple copy purchases. Slerre C ia available 
for shipment today. 

Located in Oakland, California, Siarra Systems la a growing 
company dedicated to providing toole for the embedded ey a terns 
market. Prevlouely engaged in the deeign of higb epeed 
graphlce syatama, Siarra Syeteaa developed sierra C as a 
result of its disenchantment with existing cross dsvslopmsnt 
toola. 
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DAISY WHEEL PRINTERS 

Quine Sprint 9 - $900 Qume Sprint S - $800 

HARD DISK 10 Megabyte Drive - Seagate 
Model #412 $275. 

3 - Dual 8" drive enclosure with power supply . New 
in box . $125 each. 

$ - Siemens 8" Disk Drive . $100 each. 



Tano Outpost n, 56K, 2 5" DSDD Drives. FLEX. 
MUMPS. $495, 

TELETYPE Model 43 PRINTER - with serial 
(RS232) interface and full ASCII keyboard . $250 
ready to run. 



SWTPC S/09 with Motorola 128K RAM. 1-MPS2, 
1-Paralell Port, MP-09CPU Card - $900 complete. 

(615) 842-4600 M-F 9AM to 5PM EST 

••• 

SWTPC 6809 system 5709 . dual 8" drives. 8212 
terminal, 128K RAM. Okidata wide carriage with 
tractor feed . $2,000 or best offer 

462-0551 or 536-0018. 

••• 

Have many 6800 and 6809 bare and working 

boards and manuals . Send SASE for list. 

Ron Mauceri. 2037 Dewberry CL.Westlake Village. 

CA 91361 

»»» 

GMX 68020 Computer, Never used. 16.7 MHz. 2 

Meg Ram. floppy. 25 Meg HD. 4 serial. 1 par. With 

C. Uniflex OS. el. al. 

$5500 new. Only $3995. Marc Talisman. 

(714) 582-9100. (714) 532-3466 eves. 
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SK*DOS 

THm Groyne DOS * tor 68000 •oplicatiom m 
A Industrial Conrrol 

* OusincuUM 

* Education*} Computing 
A SCixitifc Compultrq 

* Number Ciunching 

* Dedicated Systems 
A Turnkey System* 

* OaU Collection 

* Single Doe*d Computer* 

* But OfJen ted Computer* 

* GrephictWorVitJtioflf 
A One-ol 9 Jund Sv»t«m$ 

* Advanced Moboynt Use 

SK*OOS t> a t mgla Lrier di* operating tyttcm (or computer* using Motor ol* 32 Oh CPUs 
wen « the 68006. 68000. 66010. end 68020. H provides the poorer ol • full DOS, yet Is 
vmoli end easy to use, and will run on lyrtems from 32K to 16 megabyte* 8ecanc 
SK«DOS is easily implemented on a new system, we call n "Tht Generic DOS" wliich 
*JJow* program* written lor one system to be run on many others. 

SK*OOS comes with over 40comnwnds and system program*, including e 6809 emulator 
wh«* aMow> 6BK SK • DOS to run epplicition proo/ems and len»«ge» tfeveloned for 6809 
SK«-DOS and oiher lyslem*. Aseembterl. editor*, end higher tevaf langueoe lupport are 
available From third party software vendors end through public domtun totlwire, 

SK* DOS i* available for single copy or dealer sales, *f well a»0 E M f karaing, Sirtfa eopies 
cost 5125 (inquire e$ to available syatemi). Extiemejy attracWe OEM 1ken«Jng terms are 
also avertable. An optional Configuration Kit contains a detailed Configuration Manuel 
and two dtlkt Of source cod* for iVitem adaptation, including *Our<* code for a system 
monitor/debug ROM end Other progrtirtt useful for adapting SK«DOS to new system*. 

SK-DOS 




Star-K 



SOFTWARE SYSTEMS CORPORATION 



P.O 6©X ?09 MT KiJCO, NY 10M8 
tCLIK 61060:677* 



INDUSTRIAL PASCAL FOR 68000 AND 6B09 

PCSK is a package that generates code for a 68000 series processor 
running on a 68000 development system It includes Ihe compiler, 
assembler, linker, hosl debugger, target debugger, and screen editor, 
all integrated logelher and controlled by a enu driven shell program 
Source code is included lor the runtime library and many or ihe 
utilities. Host operating systems supported are 0S-9/ 68000 
(Microware}. POOS (Eyring Research), and VERSAdos {Motorola) 

PXK9 is a package lhal generales code lor a 6809 processor running 
on a 68000 devefopmeni system Includes all ol the features of ihe 
PCSK package above, except (or the hosl debugger Hosl operating 
system is OS-9/68000 

I WANT IT, WHERE DO I GET IT? 

For more Information on either ol these two products please corrlacl 
Certified Sollware, South East Media, or one of our European 
Licensees. 



OEM LtCENSEES 
Gespac sa. 3. cherrnn des 
Aulx, CH-1228 Geneva/Plan* 
les-Quales. Swil* TEL {022) 
713400, TLX 429989 

PEP Elektronik Systeme 
GmbH, Am Klosterwald 4. 
D-8950 Kaufbeuren, Wesl 
Germany THL (08341) 8974. 
TLX 541233, 

Ellec Elektronik GmbH. 
Gatileo-Galilei-Strasse. 6500 
Mainz 42. Postfach 65, West 
Germany. TEL {06131) 
50031, TLX 4187273. 



DISTRIBUTORS 

R C S Microsystems Ltd 
141 Uxbridge Road. Hamplon 
Hill. Middlesex. England TEL 
01-9792204. TLX 8951470 
Dr. Rudolt Keil GmbH. Por* 
phystrasse 15. D-6905 
Schriesfteim, West Germany 
TEL 062 03/6741, TLX 
465025 

Elsofl AG, Zelgweg 12, 
CH-5405 Baden-Daellwil. 
Switzerland TEL 
056-833377, TLX 828275 
Byte Sludio Borken, Sulen- 
wall 14, 0-4280 BorKen. 
Wesl Germany TEL 
02861-2147. TLX 813343 



CERTIFIED 616 CAMIN0 CABALL0. NIP0M0. CA 93444 

SOFTWARE TEL: (805) 929-1395 TELEX 467013 

CORPORATION FAX (805) 929-1395 (MID-8AM) 



SOFTWARE FOR 680x AND MSDOS 



DISKETTES & SERVICES 



SUPER SLEUTH DISASSEMBLERS 
EACH S99FLEX S101-OS/9 S100UN1FLEX 
OBJECT.ONLY vtrtlon: EACH $SO-FlEX.OS**CQCO 
mteractattty gfloeraia som cs on d^K with Labels, include if ot . t>nvy sdning 
speedy 6000,1 2 1 . 33^.9*502 votaoa or ZBOflOSO.b w«ton 

I ifiiwaton to ?omm RBI toMMtetjttj i warn i m 

COCO DOS BvaAatom in 6800. 1 ,2,3,5.B.a^S&2 vartfon (not Z80/8080 .5> only 
NEW: 66010 disassembler *l00-FLEX,OS/9.UNiFLEX,OS/fl<66K,MSDOS 

CROSS-ASSEMBLERS WTTW MACRO CAPABILITIES 
EACH $50-FLEX.OS/9.UNIFLEX,MSDOS,UNIX 3/$100 ALUS200 
sooctfy 16Ox.6502.M01.eB04.e805.6BO9.ZB.ZeO, BO« B.B051.8085.WJ0 10,3 OOO 
modular oo«*aa*#n***j<nC,wftn»aadA*m*d ubl«e& NOW OS/9-6AK 

S04JCM fo»«>tak»i»li50ea<*.$i00rdf3, S300tor«l 

DEBUGGING SIMULATORS FOR POPULAR BBrr MICROPROCESSORS 
EACH S75.PLEX Sl0t>OS/9 SB4MJNJFLEX 
OBJECT-ONLY v*r»J©n*: EACH ttfrCOCO FLEX.COCO OS* 
tfflBr%£0trflfy4*riuiajft proewsorv 'mdudm d«a »»» mt*y formatting, bivvy sditirtg 
Speoiy lor BSOOh, (14)0806. BS02. 6809 OS*. ZBO Fl£X 

ASSEMBLER CODE TRANSLATORS FOR 6502, 6B0O71, 6809 

650? to 6809 J7S-FLEX MS-OS* WO-UNIFIEX 

6800/1 to 6809 & 6609 to pwionwid 1B0.FLEX WS-OSf* SBO-UNIFLEX 

FULL-SCREEN XBASIC PROGRAMS with cursor control 
AVAILABLE FOR FLEX, UNIFIEX, AND MSOOS 

DISPLAY GE NEHATOfrtXXUMENTOff tSO vt'aovfcm, $25 wlthotil 

MAIL NG LIST S YST EM 1 1 00 w iOore*. $50 wHttout 

iNVErVrOHY WITH MRP HOO itMvrei, $50 wtrtiogr 

TABULA RASA SPREAOSI^E T $100 wftovrf, 550 without 

DISK ANO XBASIC UTILITY PROGRAM LIBRARY 
S50-FLEX S30.UNIFI.EX/MSDOS 
«dt dtsM MrsTs. son rAnp4<»y, mairta^ tr&a cMalcg, ctocasKsor». 
nadqjgncB njm or «fl o» BASIC ptv* 1 '. *«* BASC pD^wn. •«& 
rw>^-EX v»5toB tftluto sort and r«w^rt» wiy 

CMOOEM mfCCMAJta^TIOKS PROGRAM 
$100-FLEX,OS/9,UNIFLEX,MS.DOS.OS/9-6BK,UNIX 
OBJECT-ONLY wrftlont: EACH $50 

meno<mvw! wiVt terminal rr»de. Ho Vanafv, MOOEM7, XONXOFF. etc 
tor COCO and nxr-COOO: Ah«$ Morai COCO enad^n port up to 3*00 feud 



5.25" DISKETTES 
EACH 10.PACK $12.50SSSD;SSDD/DSDD 
Amo»icwi«rTvada. gMo/anteod l0O%CMaMy. wi^ Tjrvokjadia^^ Hob nnQ». and M 

ADDITIONAL SERVICES FOR THE COMPU11NG COMMUNITY 
CUSTOM [ZEO PROGRAMMING 
we will customize any of do proo/amadeaenbed n this adv^tsemBrv) or « ou» 
brotiins *rx spBciafcaeo qa»ottv um or to covw new proosfiaa; the tf\aQe 
lor 9udt\ cxrskMrt2Msxw\ de^wls upon Hw (T\*XtfQt*ty of Hw rmS#kxtM« 

CONTRACT PROGRAMMING 



r many yon. (ho cEvr^xava on wflCh wa 



mainJtamaa, lnckidi^9 IBM. 6\rrv^», Uhivac > >J » y »e*. most pcoUar 
makrti Ol nwvxvr^Atra. tvk^ng DEC; fiM, OQ. HP. AT6T, and rnost 
poplar brands of rrtamyvta/iora. *cU**q 6800/1 . 6809, ZBO. 6602, 
56000. usmg mo# ap gt gnaa *rv>«0"» and opounho, ffy»rn». on Byfiams 
ranging In me from larpe a<aiiiimf<cwgTi to&ingtB ooard oonooflara, 
the citofga kx cortnei ^nv«'v<«^ tausuajry by Oio hour or bythatasM 

CONSULTING 
w«on^awKJ*fano^ofbtairvBandBK^vv^cx3nM(t»^»9v^ 
sominam, <*Arca trarw^). and dasign on any topic related to arvfUSBT. 
the charge tor o>«Ang fe oomAaty baaed upon hme. travel and etpenM^ 



Computer Syeteme Coneultante. Inc. 

1454 l.atta Lane. Conyera, GA 30207 

Telephone 404*463*4570 or 1717 

We take orders at any time, but plan 
long dlecusslona after 6, If possible. 

Contact ua about catalog, dealer, discounts, and services. 
Most programa In source: give computer, OS, disk atze. 
25% off multiple purchases of same program on one order. 
VISA and MASTER CARD accepted; US funde only, please. 
Add GA salea lax (if In GA) and 5% shipping. 

IWQFlEXfrTi Tw*^t*9*«>«*Con»Aa/«KOS9 MicXtaOT: COCO TanftlG&OS UtottfoB. 
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Omega . . . The Desktop Mainframe 

12.5 MHz MC68020 32-bit microprocessor & MC68881 FPCP as standard. 

1 megabyte of non-volatile, zero wait-state STATIC RAM and 128k/256k bytes ROM. 

25.5 megabyte (unformatted) Winchester Hard disc as standard. 

1.0 megabyte (unformatted) DS/DD 80 track floppy disc drive (specify 5V«" or 3Vi"). 

Five RS-232C serial ports (one may be configured as an RS-485 network node). 

One Parallel printer port and one 16-bit bi-directional parallel port. 

Non-volatile clock calendar and power supply supervisor. 

OS-9/68K™ 'Professional' with full MC68881 FPCP support and 'C compiler. 



OMEGA/1 2.5/OS 
OMEGA/1 6.6/OS 
OMEGA/1MB 
OMEGASER9 
OMEGA/GRF 



OMEGAw/12.5MHz020/881 &OS-9/68K™ 
OMEGA w/16.67MHz020/881 &OS-9/68K™ 
1 megabyteadditionalSTATICRAM 
9 port RS-232C serial expansion board 
640 x 480 x 4 bits/pixel ACRTC graphics l/F 



$4750.00 
$4950.00 
$ 895.00 
$ 645.00 
$ 925.00 



PRICES INDICATED INCLUDE SHIPPING AND APPLY TO U.S. CUSTOMERS ONLY 



c 



VISA/MASTER CARD ORDERS ACCEPTED 



3 



OS-9 is a trademark of Microware Systems Corporation 
NON^U S CUSTOMERS SHOULD CONTACT THE NEAREST DEALER FOR PRICE & DELIVERY INFORMATION 



NORTH & SOUTH AMERICA 



ALL OTHER ENQUIRIES 



CONTINENTAL EUROPE 



LLOYD I/O INCORPORATED 

19535 NE GLISAN 

P.O. Box 30945 

PORTLAND, OR 97230 <USA) 

TEL: (503) 666-1097 

TLX: 9103805448 LLOYD I O 



WINDRUSH MICRO SYSTEMS 

WORSTEAD LABS. 

N. WALSHAM, NORFOLK 

NR28 9SA. ENGLAND 

TEL: (0692) 404086 

TLX: 975548 WMICRO-G 



SNIJDER MICRO SYSTEMS 
SCHOOTEINDSEWEG 8a 
5756 BD Vlierden 
The NETHERLANDS 

TEL: (0)4930-11975-13666 
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The 

Users' 
Group 



Public Domain Software 
Library Directory 

Now Available! 



Complete descriptions and cross referenced index lor thousands 
of C Source Programs in The C Usees* Group Library 

A quick and handy reference for localmg public domain edAore, 
text formatters, compilers, UNIX like tools. etc.. ail in C 

Indexes programs for CP/M, UNIX, and MS-DOS 



IT5C KtmHiAm SN JO* 



ntoirvU,* tfui.1 H* C U»»r» (ktMV 



The LAB 6603 helps you prototype your design in less time, 
for less money. Easy to use and easy to modify, the LAB 6809 
is the optima* development tool for 6609-based applica- 
tions wilh high performance objectives. 




mm m i 



Use as standalone or system CPU 66B09 jumper seleclable for l 
or 2 MHzG 2 MHz I/O wilhot/t wait stales lor on board devicesC 68 B50 
RS 232C se*iaJ port on board provisions for additional 6650,6540. 
682 1 , other I/O devices PlCOBUG rnonitor provides VQ and debug* 
gir>g routines 22 sq.m user wirewrap area gold DfatedSS 60 con- 
nectors oompret tensive documentatjon 

Put the LAB 6609 to work on your next project. $395. 

Sniping and handling SiO tUSi. $20«ou«»ide US) Texas residents add sales 
tax MasterCard. VISA accepied Technical bulletin ewailableon requeai 
Oeaier «qutos invited 



^Barton 



MEUtGiNT TOOLS FOR 
WHLtGFHT CONTROLS 



1606 West 14th Streel Austin. TX 78703 512/477*6809 



Nvslelled SysUmi World-Wide 

OVER 10 YEARS OF OENCATIO QUALITY f 



I A Divition of 
*C 



'omputer rublithing, inc. 
5900 Cassuixlra Smiih Road 
Hixson.Tn 37343 
Telephone 61 5 842 4600 
Telex 510 600 6630 



DATA-COMP 
SPECIAL 
Heavy Duty Power Supplies 

For A limited time we are offering our HEAVY DUTY SWITCHING 
POWER SUPPLY. These are BRAND NEW units and will not last 
long. Also note that these prices are less than 1/4 the normal price 
for these high quality unit. 




Make Bc*chert 



Sizn 1CL5 x 5 * £5 inches . including heavy oounflag 
bracket k4 HntaiulL 

Hating: m 1 10/Z20voliAac{stnp change) CU: lX>waoa 

Output *Sv . 10 i/np 
«12v 4.0 ampi 
*12v-Z0ampa 
-12v-0.5 cjup* 

MiUng O*>nntaor. Terminal ttrip 

Load ftaadksi: Automatic ahoti drcvii recovery 

R*fl 

SPECIAL: $59.95 
2 or more 49.95 



Add: $7.50 each S/H 



Make: Boacbcrt 



So* 10.75 * 6 2 x 2.25 i 

Rating: 1 10/230 ac (strap change) (XL 81 wans 

Output* «5v ■ 8j0 amp» 
*12v-24anipfi 
«12v-24iznpi 
il2v Zi axnpa 
-I2v- (Mampi 

Mating Canadian: Mole* 

toad ReacrJoo: Atftaoaiic ibort circuit rooowy 

Each 
SPECIAL: $49.95 
2 OR MORE 39.95 

Add: $7.50 S/H each 
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4th July Sale 

Expires July 31. 1987 




S. E. Media 



Savings to 50% 



And Morel 



All other items 10 % off - Sale ends 7/31/87 
Add; $2.50 S/H all software, each item. 



HEM 



Prices 

Reg Special 



CoCo/OS-9 BASIC Xref w/source 79.95 49.95 

CoCo/OS-9 BASIC Xref w/o source39.95 24.95 

OSM - 6809 Assembler Uoyt) I/O 99.95 49.95 

Search & Rescue - Lloyd I/O 0S-9 35.00 24.95 

C COMPILER - Windrush FLEX 295.00 195.00 
BEPACK Vairginia Co. FLEX 

VIRTUAL TERMINAL CoCoOS-9 49.95 36.95 

CoCo KANSAS CITY BASIC 3995 24.95 

LSORT OS-9 Sort/merge I II 85.00 54.95 

BAS-EDfT FLEX (TSC BASIC ut'l) 39.95 19.95 
ASSEMBLERS Assorted Loyd lO discounted cafl 
K-BASIC Compiler compiles XBASIC • FLEX - OS-9 

very popular BASIC compiler.. 199.95 79.95 

DYNACALC Great spreadsheet 200.00 99.95 

DYNAMITE FLEX OS-9 CoCo all varies 49.95 

STYLO Word Pro CoCo OS-9 99.95 49.95 

PL9 5" FLEX 198.00 129.95 

SCREDfTOR III 5" 175.00 119.95 



AR Great Plains FLEX 295.00 1 29.50 

RRMac Great Plains FLEX 150.00 74.95 

INFOMAG Great Plains UniFLEX 395.00 99.50 
SPELLING CHECKER FLEX 99.95 49.95 

MAIL MERGE FLEX 79.95 39.95 

C Compiler Introl FLEX - OS-9 575.00295.00 
REL MACRO ASMB Microware OS-9 200.009950 
CHECK & TAX Star-Kits FLEX 50.00 19.95 

STAR-DOS CoCo 34.50 19.50 

HUMBUG Star-Kits (tape) 40.95 9.95 

REMO-TERM CoCo (tape) Remote CRT ? 9.95 
SPELL 'N FIX Star-Kits FLEX 89.29 39.95 

ASSORTED TSC 6809 FLEX UniFLEX 40-75 % off 

Assorted Hems: (some new • some used working) 
SWTPC SO-9 Computers 128K 3000.0075% off 
Assorted boards, etc. Lip to 90% off - call 

NOTE - STAR«)S$lCOOS fire sane as FLEX 



See S.E. Media Catalog - page 29 for descriptions 
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THE 6800-6809 BOOKS 

..hear ye. He*R 



OS-9 
User Notes 



By: Peter Dibble 

The publishers of 68' Micro Journsl sre proud to makr 
svsilsble the Publlcstlon of Peter Dibbles 

os9 usgt pons 

luformatloa for the BBGUTNIR to the FlO. 
tegular or CoCo 0S9 

Uslag 0S9 

KELP, HINTS, PROBLEMS, REVIEWS, SUCCESTIONS, COmPIJUNTS, 

0S9 STANDARDS, GenerstlriK s New Bootstrsp, Building s 

new System Disk, 0S9 Users Croup, etc. 

Progrsm Interfacing to OS9 

DEVICE DESCRIPTORS, DIRECTORIES, "FORkS", PROTECTION, 
"SUSPEND STATg", "PIPES", "INPUT/OUTPi T SYSTEM", etc 

Prograsvtvg Unguals 

Assembly LanjtusRe Programs snd Interfacing; Bssic09, C, 
Psscsl, snd Cobol reviews, proxrama, snd uses; etc. 



Disks Include 
■© typing all the Source Listings in. Source Code snd, 
where sppllcsble, sssenbled or conplled Operating 
Frogrm. The Source snd the Discussions In the 
Colunns csn be used "as Is", or ss a "Starting Point" 
for developing your OWN nore powerful Programs. 
Prograni aoaetlmea use nultlple Lsngusges such ss s 
short Assenbly Language Routine for resdlng s 
Directory, which Is then "piped" to s Besic09 Routine 
for output formatting, etc. 



BOOK $9.95 

Typeset — w/ Source Listings 

(3-Hole Punched; 8 x 11} 

Deluxe Under ---$5-50 



All Source Listings on Disk 

1-8" SS t SO Disk $14.95 

2-5** SS, DO Disks $24.95 




FLEX™ 
USER NOTES 

By: Ronald Anderson 

The publishers of 6* MICRO JOURNAL sre proud to 
nske svsilsble the publlcstlon of Ron Anderson's FLEX 
USER M0TI3, In book forn. This populsr Monthly column 
has he en s regular festure in 68' MICRO JOURNAL SINCE 
1979. It hss esrned the respect of thouBsnds of 
60 MICRO JOURNAL resders over the years. In fsct, 
s column hss been described ss the 'Bible' for 68XX 
users, by some of the world's lesdlng microprocessor 
professlonsls. The nost needed snd populsr 68XX book 
svsilsble. CXrer the yesrs Ron's column hss been one of 
the nost populsr In 68 MICRO JOURNAL. And of course 
68 MICRO JOURNAL is the nost popular 68XX magazine 
published. 

Listed below sre s few of the TOT files Included In the 
book snd on diskette. 

All TEXT tiles m the book are on ihe disks 



LOGO CI File load program lo olfsel memory — ASM PIC 

MEMOVE CI Memory move program — ASM PlC 

OUMPd Pnnler dump program — uses LOGO — ASM PIC 

SUBTEST C1 Simulation oi 6600 code to 6609. show differences — ASM 

TERMEM C2 Modem mpul lo disk (or olher port tnput to disk) — ASM 

M C2 Oulpul a file lo modem (or another port) — ASM 

PRINT C3 Parallel (enhanced) pnnler driver — ASM 

MODEM C2 TTL outpul lo CRT and modem (or other port) — ASM 

SCIPKG C1 Science math routines — PASCAL 

U C4 Mini, monitor, dtsk resident, many useful functions — ASM 

PRINT C4 Parallel pnnler driver. w«houl PFLAG — ASM 

SET C5 Set printer modes — ASM 

SETBAS1 CS Set pnnler modes — ABASIC 

NOTE: .C1..C2, etc. -Chapter 1, Chspter 2, etc. 

**0ver 30 TEXT files Included Is ASM (sssenbler)-PASCAL- 
PIC (position Independent code) TSC BASIC-C, etc. 

Book only: $7.95 + $2.50 S/H 
With disk: 5" $20.90 + $2.50 S/H 



With disk: 8" $22.90 + $2.50 S/H 

Shipping A Handling $5.50 per Boot, $2-50 per Disk xt 

Foreign Orders Add $4.50 Suffice Miil 
of 57.00 Air Mai) 

If paying by check - Please allow 4-6 weeks delivery 

* All Currency in US. Dollars 

Continually Updated In 68 Micro Journal Monthly 

Computer Publishing Inc. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 



"FLEX Is s trademark of Technical Systems Conaultanta 

"0S9 Is a trsdewerk of Mlcrowsre arvd Hotorols 

~b8* Micro Journsl Is s trademark of Computer Publishing Inc. 



(615)842-4601 

Telex 5106006630 
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OS-9 



L1 UTILITY PAK— Contains all programs formerly in 
Filter kits 1 & 2, and Hacker's kit 1 plus several 
additional programs. Complete "wild card 1 * file 
operations, copies, moves, sorts, del, MACGEN shell 
command language compiler, Disassembler, Disk 
sectoredit utility, new and improved editions, approx. 
40 programs, increases your productivity. Most 
programs applicable for both level I & II 6609 OS-9. 
$49.95(351.95) 

Call or send Self Addressed Stamped Envelope for 
catalog of software forcolorComputerOS-9 and other 
OS-9 systems. 

BOLD prices are CoCo OS-9 format disk, other formats 
(in parenthesis) specify format. All orders prepaid or 
COO, VISA and MasterCard accepted. Add $1.50 S&H 
on prepaid, COD actual charges added. 

SS 50C 

MEMORY LIQUIDATION SALE! 

(While Supply Lasts) 

1 MEGABYTE RAM BOARD 

Full megabyte of ram with disable options to suit any 
SS-50 6809 system. High reliability, can replace static 
ram for fraction of the cost. $399 for 2 Mhz or $439 for 
2.25 Mhzboard assembled, tested and fully populated. 

2 MEGABYTE RAM DISK BOARD 
RD2 2 megabytes dedicated ram disk board forSS-50 
systems. Four layer circuit board socketed for 2 
Megabytes! Special sale price of $399.00 includes only 
256kof ram Installed (you add the rest), includes OS-9 
level I and II drivers for Ram disk, (note: you can re- 
boot your system without losing ramdisk contents). 
(Add $6 shipping and insurance.) 

Please call for answers to your technical questions 
concerning these products. 

D.P. Johnson, 7655 S.W. Cedarcrest St. 
Portland, OR 97223, <S03) 244*6152 

(For best service call between 9*11 am Pacific time.) 

OS-9 (a a trademark of Microwave and Motorola Inc. 
MS-DOS la a trademark ol Microsoft Inc. 



COMPILER EVALUATION SERVICES 

BY: Roe Andorra 

Tbe SX. MEDIA Dlvidon of Computer 

PubUAfag Inc. 

b offering the folkmtng SUBSCRIBER 

SERVICE; 

COMPILER COMPARISON AND EVALUATION REPORT 

Due to die constant and rapid updating and enhancement 
of numerous compileis, and the different utility, appeal, 
speed, level of communication, memory usage, etc., of 
different compilers, the following services are now being 
offered with periodic updates. 

This service, with updates, will allow you who axe wary or 
confused by the vaiious claims of compiler vendors, an 
opportunity to review comparisons, comments, 
benchmarks, etc., concerning the many different 
compilers on the market,, for the 6809 microcomputer. 
Thus the savings could far offset the small cost of this 
service. 

Many have purchased compilers and then discovered that 
the particular compiler purchased either is not the most 
efficient for their purposes of does not contain features 
necessary for their application. Thus the added expense 
of purchasing additional compilers) or not being able to 
fully utilize the advantages of high level language 
compilers becomes too expensive. 

The following COMPILERS arc reviewed initially, more 
will be reviewed, compared and beschmariced as they 
become available to the auiha: 

PASCAL *C CSPL WHIMSICAL PL/9 

Initial Subscription • $39.95 

(includes 1 year updates) 
Updates for 1 year - $14.50 

S.E. MEDIA - CPJ. 

5900 Cassandra Smith Rd. 

Hlxson, TN 37343 

(615) 842-4601 



I Call for Software: 

\ 68000, C, Basic09 
i Sculptor 

i 

] We ore receiving calls and letters from numerous 
(sources, including users, business and others looking 
for OS-9 68000 software; applications, etc. 

I 



Many of you have developed software that with 

Uttle change could be adapted for others. If you 

are Interested In selling It. please let us know. There 

Is a growing market out there now. Get in on the 

ground floor! 

If you can use additional Income and have some- 
thing that might be of Interest, call and talk to Larry 
or Don. 

S.E. MEDIA Division - CPI 



POB849 
Hixson. TN 37343 



Telephone (615) 842-6809 
Telex (510) 600-6630 
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Stop! 

Get a 25 Mega- 
Byte Hard Disk 
practically FREE 

only 1C 

•Be Sure to Consider the 

SPECIAL MUSTANG-08/A 

10 Sale on page 7 

•This is exactly one cent more than the price of 

the same system - with two floppies - for one cent 

more you get one floppy and a 25 Mega Byte Hard Disk with the faster 

CPU board, additional serial ports and improved clock! 
Includes Professional OS-9™ Version 2 and the $500.00 C Compiler! 

Remember - When it's over, IPS OVER! 

We don't know how long this very, very low price can be maintained, don't miss it! 

Data-Comp Div. - CPI 

68' Micro Journal August 37 G T 



6809<>68XXX 
UniFLEX 

X-TALK 

A C-MODEM/Hardware Hookup 

Exclusive for the MUSTANG-020 running 
UniFLEX, is a new transfer piogram and cable set 
from DATA-COMP (CPI). X-TALK consist of 2 
disks and a special cable, this hook-up enables a 6809 
SWTPC UniFLEX computer to port UniFLEX files 
diiectly to a 68XXX UniFLEX system. 

Ihis is the only currently available method to 
transfer files, text or otherwise, from a 6809 
UniFLEX system to a 68000 UniFLEX system, that 
we have seen. A must if you want to recompile or 
cross assemble your old (and valuable) source files to 
run on a 68000 UniFLEX system. GIMIX users can 
directly transfer files between a 6809 GlMIX system 
and our MUSTANG-020 68020 system, or GIMIX 
68020 system. All SWTPC useis must use some sort 
of method olher than direct disk transfer. The 6809 
SWTPC UniFLEX disk format is not readable by most 
other 68000 type systems. 

Ihe cable is specially prepared with internal 
connections to match the non-standard SWTPC SG'9 
DB25 connectors. A special SWPTC+ cable and 
software is also available, at the same price, Orders 
must specify which type SWTPC 6809 UniFLEX 
system they intend to transfer from or to. 

Itie X-TALK software is furnished on two 
disks. One 8** disk containing the 6809 software and 
one 5" disk containing the 68XXX software. These 
programs are also complete MODEM programs and 
can be used as such, including X on X-off, and all the 
other features you would expect from a full modem 
program. 

X-TALK can be purchased with/ without the 
special cables, however, this SPECIAL price is 
available only to registered MUSTANG-020 owners. 

X-TALK, w/cable $ 99.95 
X-TALK only 69.95 

X-TALK w/source $149.95 

DATA-COMP 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 

Telephone 615 842-4601 
Telex 510 600-6630 

Not*; Regislered MUSTANG-020 owners musl turnteh system 
serial number In oofer to boy at these special low prices. 



68 MICRO JOURNAL 
Reader Service Disks 

Disk- 1 Filcsoil, Miwicat, Minicopy.Minifms, ••Lifetime, 

••Poetry, ••Foodiist, ♦•Diet. 
Disk* 2 Diskedit w/ inst.A fixes. Prime, •Pnnod, 

••Snoopy, ••Football. ••Hexpawn.* •Lifetime, 
Disk- 3 Cbug09. SkI, Sec2. Find. Table2> Intext. Disk- 

exp, •Disksave. 
Disk- 4 Mailing Piogram, •Finddal, •Change, •Tesldisk. 
Disk- 5 ♦DISKHX l,*DISKFIX2, ♦•LETTER. 

••LOVESIGN. ••BLACKJAK, ••BOWLING. 
Disk- 6 ••Purchase Order, Index (Disk file indx). 
Disk- 7 Linking Loader. Rload, Harkness, 
Disk- 8 Citest. Lanpher (May 82). 
Disk- 9 Dateoopy, Diskfix9 (Aug 82), 
Disk- 10 Home Accounting (July 82), 
Disk- 1 1 Dissembler (June 84). 
Dlsk-U Modem68 (May 84). 
Disk- 13 •Initmf68. Testmf68. •Cleanup. •Dskalign. Help, 

Datc.Txt. 
Dlsk-14 •ink, •Test, •Terminal. •Find. •Diakedil. IniLlib 
Disk- 1 5 Modem + Updates (Dec 84 Gilchrist) to Modem 

(April 84 Commo). 
Disk- 16 Copy.Txi, Copy. Doc, CaLTxi. Cat Doc. 
Dlsk-17 Match Utility, RATBAS, A Basic Preprocessor. 
Disk- 18 Parae.Mod. Size.Cmd (Sept. 85 Armstrong). CMDC 

ODE, CMD.Txt (Sept, 85 Spray). 
Disk- 19 Clock, Date. Copy. Cat. PDGLAsm A Doc. 

Errors, Sys, Do. Log .Asm & Doc. 
Disk -20 UNIX Like Tools (July & Sept. 85 Taylor & 

Gilchiist). DragoaC. Grcp.C. LS.C. FDUMP.C. 
Disk- 21 Utilities & Games - Date. Life. Madness, Touch, 

Goblin, Slarshot, & 15 more. 
Disk -22 Read CPM & Non-FLEX Disks. Fraser May 1984. 
Disk -23 ISAM, Indexed Sequential file Accessing Methods. 

Conden Nov. 1985. Extensible Table Driven. Un 

guage Recognition Utility, Anderson Match 1986, 
Disk- 24 68' Micro Journal Index of Ankles & Bit Bucket 

Items from 1979 - 1985. John Current. 
Dlsk-25 KERMIT for FLEX derived from ihe UNIX ver. Burg 

Feb. 1986. (2)-5" Disks or (l)-8" Disk. 
Disk- 2 6 Compacta UniBoard review, made & diagtam, 

Burlison March '86. 
D Is k - 27 ROTABITTXr, SUMSTESTTXT. CONDATA TXT, 

BADMKN.TXT. 
Disk- 2 8 CT-82 Emulator, bit mapped. 
Dlsk-29 ••Star Trek 

Disk -30 Simple Winchester, Dec'86 Green, 
Dlsk-31 ••• Read/Wiite MS/PC-DOS (SK*DOS) 
Dlsk-32 Ilier-UNIX Type upgrade • 68MJ 2787 



NOTE: 

This is a reader service ONLYI No Warranty is offered or implied, 
ihey ate as received by 68' Micro Journal, and are for reader 
convenience ONLY (some MAY include fixes or patches). Also 6800 
and 6809 progiams aie mixed, as each is fairly simple (mostly) to 
convert to the other. Software is available to crosi-auonble alt 

• Denotes 6800 - ♦* Oroies BASIC 
••• Oenotes 68000 - 6809 no indicator. 



Specify 8" disk $19.50 
5" disk $16.95 



Add S/H . $3-$0 
Oversets add: V4.S0 surface - $7.00 Air Mail, USA Dollars 

68 MICRO JOURNAL 

PO Box 849 

Hixson, TN 37343 

615 842-4600 - Telex 510 600-6630 
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IF YOU NEED IT, WE'VE GOT IT! 
(OR WE'LL MAKE IT) 

Yes. PE Rl PHE RAL TECHNOLOGY still sells t he FD-2 lor SS-50 Bus Computers And. if you don't 
need it, we sell other products from Smgte Board Computers to Systems which should lit your 
requirements. Custom Hardware Design is also available Here's a smallsampleol what we otler 



FD-2 FLOPPY DISK CONTROLLER 

• Control* 0p to tour 5 V Drives 

• Run* in 1 or 2 MHZ Systems 

• Can bo configured tor either 4 or 1 6 

• Addresses pet I/O Slol 
(SS30 or SS30C I 

• U»03 W02797 Controller Chip 
(COmPdhblO wjth 1 771/1 79X 
Controller Chip* 

• Hardware and Software compatible 
with SWTPC OC-4 cor>! rollers 

• 6600/6609 Flo* Drivers available 

• SK'DOS Operaimg System or 
OS9/6809 river package 



PT69-4 SINGLE BOARD 
COMPUTER 

-6809E Processor/1 MHZ Clock 

• Four RS232 Senal Ports using 
6850S 

• Two 8-Bit parallel Ports using 
6621 Pm 

• Time Of Oav Clock CMC 1466161 

• 59K of user RAM 

• 2Kor 4Kol EPROM using 27 16 
or 2732 

• Double Sided/Ooubfe Oensity 
f fops/ Conlroller 

• Can Read/Wr>te Radio Shack 
OS/9 Diskettes 

• Board Site Sft~ Xd? 




MONTHLY SPECIAL 

PT68K-1 lOMhz$375 

Regular Prico $495 






PERIPHERAL TECHNOLOGY 

1480 Terrell Mill Road, Suite 870 

Marietta. Georgia 30067 

(404) 9840742 Telex # 880584 

VISA/ MASTERCARD t CHECK /COD 



SYSTEMS 

• Floppy o* Winchester Versions 
Available 

» Systems use any 6609 Si"Q>» Board 
Computet or 68008 Board 

■ W«H be configured to meet your 
Requirements 

• OSg I SK'DOS Operetmg Systems 

• Call or wnle tor system 
configurations 




Catalogues Available UPOn Request 



XDMS-IV 

Data Management System 
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Sove $ 1 00.00 - limited Time 
Regular $350.00 jJitow-OnTy 

$249,95 



Technics I I ilc phone asiklance: Tel 91 4- SM 1-3552 (Evening*) 
LEX™ Trcnkal Systems Cocuu I la nU, SK«DOS™ STAR KITS Corp. 



FOR 6809 FLEX-SK-DOS(5/8") 

Up to 32 gja»j«rfkl0j P° nnid I Up to 12 character filed namel Up to 10)4 byie roxordst User 
Ofifincd senm and prim eaMwslI fteeet* fueal Farm fDeal Candiiionsi eionfliant fa**** 
chaining) Uf>w*ni/Oownward file linking! Rk joining I Random file virtuil pagingt Hies in 
utilities! Buih in text line cditorl Fully session oriented I Enhanced forms! Boldfioc, Double 
width, Italic* and Underline supported? Written in exsnpect itroauced uianblcr! Integrated for 
FAST ejtrxuiunl 

XDMS IV Data Management Syttom 

XDMS-IV ti a brand new approach lo data management, ll noi only permits users to 
daaarifc^ enter and retrieve data, but also to process enure file* producing eusinmiud report** 
screen displays and file output Proceaiuig cm consist of sny of a set off standard high level 
functions including rocoM and field •election, soiling and aggregation, lookups in other Hies, 
special processing o( record tubacsa, custom report foimatting. bottling sod auhusaling, snd 
presentation of up lo three related filet u i "database* on user defined output reports. 
POWERFUL COMMANDS) 

XDMC-I V combine* the functionality of many pnrailar DB MS software system* with I new ciiy 
to vac command act into ■ single ififgniai package. We've included many new features s-\d 
commands including a act of goienl rUc uuljuca. The pror*aaing OMtmind* arc Input-Ptc^ex. - 
Output 0PO) ohenscd whkti allows aamoat inflant atiplemenuidon of ■ prasza «k»ign» 
SESSION OaUEKTED! 

XDMS-IV if session onenied. Enter *XDMS" and you arc ia insum aommand of all the 
features. No more waiting for a etsmmand to load in from disk! Many cosunaods are immediate, 
cucb aa C31EATE (fUc defifu£icai\ UPDATE (rile editor>. PURGE and DELETE (utilities). 
Others arc pmwi commands whkJt are used lo create a user fvr**A which is eacnned with s 
RUN ostanand. Either may be czwxred into s "pvoccsa' file which ia r^ roiled by an EXBCUTt: 
T^anr may eteetae oOjct picc^Kes, or ihernacivea, either conditionally or 
Vy, Mess a and scrcm pnxnpta arc easily oodad. aed ereire user appticatirais can be 
r leaving XDMS IV! 
ITS EASY TO US£! 

XDMS-IV keep* dsi* managtsnoni tanpael Ritho than design a amines DBMS which hide* the 
true nature of the data, we kept XDMS-IV rue orunod* The user view of data fclaoojuhipa is 
presented in report* and screen output, while the actual data resides m easy u>Runraein file*. This 
•sped peoniu cususmize^ ptesensation and repoTta without oomptcx redefinition of the dalabaa c 
file* and effuexure, XDMS-IV may be uaod for a wide nji$c of applications from sijipk rtxxxd 
management cyslama (aodrease*. orventory ...) to integnied daubase *>stcms (order entry. 
^ > The po—toliues are unlimited. 



^'LKX 1 



Vha & Muster Card Excepted 

Telephone: 615442-4601 or Telex: 510 6004630 
Or Write: S.E. Media, 5900 Cassandra Smith Rd., 
Hlxson, Tenn. 37343 
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GmX Micro -20 

68020 SINGLE-BOARD COMPUTER 



Mainframe CPU Performance 
on a 5.75" x 8.8" Board 

(benchmark results available on request) 



$2565 



00 12.5 MHz Version 

Quantity Discounts Available 




Features 



Software 



32-Bit MC68020 Processor (12.5, 16,67, or 

20MHZ) 

MC68881 Floating-point coprocessor (optional) 

2 Megabytes of 32-bit wide, high-speed RAM 

4 RS-232 Serial 1/0 Poits (expandable to 36) 

6-bit Parallel 1/0 Port ('Centronics' compatible) 

Time-ot-Day Clock w/ battery backup 

16-bit 1/0 Expansion Bus 

Up to 256 Kbytes of 32-bit wide EPROM 

Floppy Disk Controller for two 5%" drives 

SASI Intelligent Peripheral Interface (SCSI subset) 

Mounts directly on a 5 V Disk Drive 

Optional Boards inciude Arcnet, Prototyping, I/O 

Bus adapter. 60 line Parallel 1/0, RS-422/485 



Included: 

• GMX Version of Motorola's 020Bug Debugger with 
up/ download, breakpoint, trace, single-step, and 
assembler / disassembler capabilities 

• Comprehensive Hardware Diagnostics 
Optional: 

UNIX™ iike Muithuser/MuitMasking 
Disk Operating Systems 

• OS-9/68000 111 (Real-time and PROMable) 

• UniFLEX™ 

Programming Languages and Application 
Software 

• BASfC. C, PASCAL, ABSOFT FORTRAN, COBOL 
and ASSEMBLER 

• Spreadsheet, Data Base Management, and Word 
Processing 

COMPLETE EVALUATION SYSTEMS AVAILABLE 



CmX 1337 W. 37th Place Chicago, IL 60609 
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(312) 927-5510 • TWX 910-221-4055 

State-oHhe-Art Computers 

Since 1975 

'68' Micro Journal 







Now Offering "FLEX'* (2 Versions) 
AND 'STAR- DOS PLUS + " 




For Ordering C*ll 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 
The Folks u/ho FIRST Put FLEX* 
The CoCo 



on 




TSC Editor 

RtjtSOOO 
NOW $35.00 



DOS PLUS 4 

• Functions Same as FLEX 

• Reads - writes FLEX Disk* 

• Run FLEX Programs 

• Just type: Run "STAR-DOS'' 

• Over 300 utilities & programs 
to choose from. 



PLUS 
ALL VERSIONS OF FLEX & STAR DOS 




+ Read-Write-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free Utlities 



INCLUDE 

+ External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoiy Examine Program 
+ Many Many More!!! 



TSC Assembler 

fUfttOOO 
NOW $3500 



Cora Disk Dnvp Susleuisl 



2 TH1NLINE OOUILB SIDED DOUILE DENSITY DISK DRIVES 
SYSTKH VlTN PDtJEI SWPLV .CAlINfcT, DISl OllVE CARLE. J4M 
NEW DISK CONTROLLER JPO-CP VJTfi J-DOS .US-DOS OPERATING 
SYSTEMS. $4*9.95 

Spidfy What CONTROLLER You W#nt JAM, or tADIO IHACX 



THINLINE DOUIt^ SIDED 
DOUILE DENSITY 40 TRACKS 



1 



Verbatim Diskettes 



Sinftle Sldtd Double Deoilty 
Daubl* Sided Doubl* Deotlty 



Cauli oilers 



J4N JPO-CP WITN J-DOS 
WITH J-OOS, RS-DOS 
RADIO SNACK J, I 

RADIO SHACK Dlik CONTROLLER 1.1 



Disk Dtive Cables 



Cflbl* for One Drive 
Cable for Two Drive* 



$179.9* 



$ 14.00 
* 14.00 



$139.95 
$159.95 
$114.95 

3134.93 



S 19.93 
S 24.93 



MK VPCRADt 

POR C.D.E.P, AMD COCO 11 
RADIO SHACK BASIC 1.2 
RADIO SHACK DISK IAS1C 1.1 

DISK OltVE CAR I NET PCJ1 A 
SINGLE DRIVE 

DISK DRIVE CABINET POR TWO 
TK INLINE DRIVES 



niVTCRJ 

EPSOM U-RO 
EPSON MX-70 
EPSOM KX-lOO 

acojmmue* not ipso* 

6 J 46 2K SEllAL BOARD 
6 J 49 32K EXPAND TO J 26K 
EPSON MX -AX- HO KI150NS 
EPSON LX-80 Rl IRONS 
TEACrOR UNITS POR LX-80 
CARLES 4 •THEN INTERSACKS 
CALL POR PRICING 



$ 29.95 

$ 24.93 
I 24.93 



I 49.93 
$ 49.95 



4219.95 
IU3.95 
$495.95 



$ R9.95 
$149.95 
$ 7.95 
I 5.93 
I 39.95 



DATA-COMP 

5900 Cassandra Smith Rd 
HiKson. TN 37343 
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SHIPPIN6 

USA ADD 211 

FOREIGN ADD 5» 

MIH. %2$Q 


(615)842-4600 

f Of Ofdvftng 

Telex 5106006630 
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S - 50 bus / 68XX 



Board and/or Computer 

Term mals-CRTs-Printers 

Disk Drives-etc. 

REPAIRS 



NOW AVAILABLE TO ALL SSO/SflXX USERS 

The Data- Com p Division of CPI ts proud to announce the availability of tieir 
service department facilities to 'ALL' $50 Bus and 68XX users. Including all 
brands, SWTPC * GlMIX - SSB - HELIX and others, including the single board 
computers. "Please note that kit-built components are a special case, and will 
be handled on an Individual ba sis . if accepted, 

1 If you require service, the first thing you need to do Is call the number 
below and describe your problem and confirm a Data-Comp service & shipping 
numbort This is very important, Data-Comp will not accept or repair items not 
displaying this number! Also we cannot advise or help you troubteshoot on the 
telephone, we can give you a shipping number, but NO advice 1 Sorry 1 

2 All service shipments must include both a minimum $40 00 
estimate/repair charge and pre-paid return shipping charges (should be same 
amount you pay to ship to Data-Camp), 

3 If you desire a telephone estimate after your repair item Is received, 
Include an additional $5 .00 to cover long distance charges. Otherwise an 
estimate will be mailed to you, il you requested an estimate. Estimates must 
be requested Mailed estimates slow down the process considerably 
However, hi repairs are not desired, alter the estimate is given, the $40,00 shall 
constitute the estimate charge, and the item{s) will be returned unrepaired 
providing sufficient return shipping charges were included with the item to be 
serviced Please note that estimates are given in dollar amounts only, 

4 Data-Corn p service is the oldest and most experienced general 
S50763XX service department in the world. We have over $100,000.00 in parts 
in stock We have the most complete set of service documents lor the variouE 
S5076SXX systems of anyone - YET, WE DO NOT HAVE 
EVERYTHING J But we sure have more than anyone else. We repair about 
90% of all Items we receive. Call for additional information or shipping 
instructions. 



DATA-COMP 

5900 Cassandra Smith Rd. 
Hixson.TN 37343 
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(615)842-4607 

Telex 5106006630 



